siehe Beispieldatei.
Die Datei https://www.herber.de/bbs/user/46242.xls wurde aus Datenschutzgründen gelöscht
Die Datei https://www.herber.de/bbs/user/46242.xls wurde aus Datenschutzgründen gelöscht
Private Sub CommandButton1_Click()
ActiveSheet.Range("D5:G" & _
ActiveSheet.Cells(ActiveSheet.Rows.Count, 7).End(xlUp).Row).Select
End Sub
GreetZ Renee
Sub markieren()
Range("d5", Range("g65536").End(xlUp)).Select
End Sub
In der Datei mit Button:
https://www.herber.de/bbs/user/46243.xls
Zu deiner Zufriedenheit?
gruß
Torsten
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen