Új hozzászólás Aktív témák

• lapa veterán

  #400

  #395 MartinIsti

  2006-04-07 19:36:44

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  lapa

  veterán

  #395 MartinIsti

  #395 MartinIsti

  Köszi a segítséget, végül én a következőt találtam ki kedden a sorok számának megállapítására (persze ehhez az kell, hogy az első üres cella alatt már ne legyen több nem üres cella):
  
  Sub elsourescella()
  
  ' Hogyan kell megállapítani az első üres sor helyét
  Dim i As Integer ' változó definiálása
  i = 3 ' változó alapértékének meghatározása
  While Cells(i, 2) <> '''' ' i-dik oszlop vizsgálata az első üres celláig
  i = i + 1
  Wend
  
  End Sub

  küzdöttem egy kört mire megtaláltam de emlékeztem, hogy nem kell ciklusozni...
  
  ActiveCell.CurrentRegion.Rows.Count
  ActiveCell.CurrentRegion.columns.Count
  vagy fixen cells(1,1).CurrentRegion.Rows.Count

• Jester01 veterán

  #396

  #395 MartinIsti

  2006-04-06 15:27:46

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Jester01

  veterán

  #395 MartinIsti

  #395 MartinIsti

  Köszi a segítséget, végül én a következőt találtam ki kedden a sorok számának megállapítására (persze ehhez az kell, hogy az első üres cella alatt már ne legyen több nem üres cella):
  
  Sub elsourescella()
  
  ' Hogyan kell megállapítani az első üres sor helyét
  Dim i As Integer ' változó definiálása
  i = 3 ' változó alapértékének meghatározása
  While Cells(i, 2) <> '''' ' i-dik oszlop vizsgálata az első üres celláig
  i = i + 1
  Wend
  
  End Sub

  Szerintem ilyen kérdésekkel ballagj át az excel makró topikba ott vannak hozzáértõk.
  Amúgy én ezt találtam: [link]

Új hozzászólás Aktív témák