Hab eine Beispieldatei von meinen Problem gemacht. Wie bringe ich das hin dass die leere Formel ignoriert wird?
https://www.herber.de/bbs/user/58405.xls
Bitte um Hilfe
Gerhrd
Sub LetzteZelleFinden()
Dim z As Long
z = Cells(Rows.Count, 1).End(xlUp).Row
Do While Cells(z, 1) = ""
z = z - 1
Loop
MsgBox z
End Sub
mfg Jan