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

• #3014 Delila_1 veterán lúzer #3012

  Új Válasz 2008-01-21 14:33:24 #3014

  Ú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

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz lúzer #3012 üzenetére

  Másik módja az utolsó sor, ill. utolsó oszlop megkeresésének, arra az esetre, ha a lapon több, egymástól üres sorokkal, oszlopokkal elválasztott adataink vannak:

  Kiválasztjuk egy olyan oszloponak az első celláját, amelyikben biztosan folyamatosan vannak az adatok, pl. A1.

  Range("A1").Select
  Selection.End(xlDown).Select ' ez azonos azzal, mint amikor Ctrl+le-nyilat nyomunk
  usor = Selection.Row
  Range("A1").Select
  Selection.End(xlToRight).Select ' Ctrl+jobbra-nyílnak felel meg
  uoszlop = Selection.Column

  Ha biztos, hogy az alsó sorban minden oszlopban van adat, a második Range-re nincs szükség.

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