Erklärung
13.08.2020 09:22:14
Rolf
lngLetzte = IIf(IsEmpty(.Cells(Rows.Count, 1)), .Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
beste Grüße und dankeschön!