wie markiere ich per vba die letzte beschriebene Zelle in Zeile A?
VG
Sub test()
Dim lngLetzte As Long
lngLetzte = Cells(Rows.Count, 1).End(xlUp).Row
Range("A1:A" & lngLetzte).Select
End Sub
MfG TomSub test()
Dim lngLetzte As Long
lngLetzte = Cells(1, Columns.Count).End(xlToLeft).Column
Cells(1, 1).Resize(1, lngLetzte).Select
End Sub
MfG Tom