erste leere Zelle

Question

Hallo,

ich habe einen Tabellenbereich "A1:E20" in dem nur die ersten 5 Zeilen "A1:E5") Einträge haben.
Das sheet hat aber weiter unten "A23:E50" auch noch Einträge...

Ich suche nun einen Code mit dem ich auf die Cells "A6" komme, also die erste freie Zelle im oberen Tabellenbereich.
Mit ...(rows.count,1).end(xlUp). Row..... klappt das aber nicht.

Hat jemand eine Idee?
Gruß Andreas

Answer 1

Hallo Andreas,

versuchs es mal so:

Range("A1").End(xlDown).Offset(1, 0).Row

Gruß

M.O.

Answer 2

Hallo M.O.

klappt einwandfrei!! Hab es noch etwas in

Range("A1").End(xlDown).Row+1

abgewndelt. Vielen Dank und Gruß

Answer 3

Hi Andreas,

mit deinem Code warst du schon fast richtig, nur musst du die letzte Zeile korrekt setzen, also nicht die Zeilenanzahl des Tabellenbattes sondern Zeile 20:

MsgBox Range("A20").End(xlUp).Row

Bis später,
Karin