Toto je můj první tip dne a s ním se pokusím čelit jedné běžné otázce pomocí VBA v aplikaci Excel. To je
Jak najdu poslední použitý řádek v konkrétním listu?
Existuje několik metod, jak toho dosáhnout, některé přesnější než jiné, ale všechny mohou sloužit vašim potřebám.
Jedna běžná metoda
LastRow = Cells.SpecialCells(xlCellTypeLastCell).Row
Což není příliš přesné, protože Excel nesleduje poslední buňku ve velmi adekvátní formě.
Další metodou k vyhledání posledního použitého řádku v konkrétním sloupci je:
LastRowColA = Range("A65536").End(xlUp).Row
Ale to vám neřekne PROSÍM poslední použitý řádek v celém listu, pokud si nejste jisti, že sloupec A obsahuje data.
Spolehlivější je několik dalších metod.
LastRow = Cells.Find("*",SearchOrder:=xlByRows,SearchDirection:=xlPrevious).Row
nebo
LastRow = ActiveSheet.UsedRange.Rows.Count
Tuto metodu lze použít na libovolném listu, nejen na aktivním listu.