Möchte über Makrobefehl alle Werte von B2 bis zum Ende der Spalte B kopieren und an einem beliebigen Platz einfügen.
Danke im Voraus.
MfG Georg
Sub kopiereSpalte()
Dim lastRow As Long
lastRow = Range("B65536").End(xlUp).Row
Range("B2:B" & lastRow).Copy Sheets("Tabelle2").Range("A1")
End Sub
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