e.....m
Makro ma znajdować pierwsza wolna komórke w kolumnie A:

Sub AAA()

Dim rngToSearch As Range

Dim
  • Najlepsze
  • Wszystkie komentarze
brak_nicku
brak_nicku
@efem: Używasz funkcji FindNext, która ponawia ostatnie wyszukiwanie, zatem funkcja da odpowiedni rezultat, tylko jeśli ostatnie wyszukiwanie było "puste". W innym przypadku znajdzie kolejną komórkę, która pasuje do ostatniego wyszukiwania
brak_nicku
brak_nicku
@efem: To zadziała, ale przy dużych obszarach danych będzie działać bardzo wolno, poza tym wywali się jak nie będzie pustych. Spróbuj z tym:

'wyszukanie ostatniego niepustego

LastNonBlankRow =

Powiązane tagi