letzte Spalte
14.12.2018 11:42:16
sigrid
ich möchte die letzte beschriebene Zelle in der Spalte a ermitteln und
diese aktivieren.
Habe dies mal zusammengesetzt, wird alles selectiert aber die letzte
beschriebene Zelle nicht, kommt Fehlermeldung.
Laufzeitfehler 424
Sub letzteZelle()
Dim letzte
letzte = Range("a65536").End(xlUp).Row
Range("a2:a" & letzte).Select
MsgBox letzte
letzte.Select
End Sub