letzte benutzte Zeile ermitteln
07.03.2006 08:55:27
ray
So ermittel ich die letzte benutze Zeile:
Sub zeileErmitteln()
Dim ZeileMax As Variant
ZeileMax = Worksheets("410").Range("f1").End(xlDown).Row
MsgBox "" & ZeileMax
End Sub
Das funzt aber nicht, wenn innerhalb des Bereiches Leerzeilen sind.
Wie muß ich das ändern, damit es mit Leerzeilen funzt?
Viele Grüße aus HH, war das nicht eben ein Sonnenstrahl?
ray