Excel: mehrere Tabellenblätter hintereinander zusammenführen (VBA)

buska, Donnerstag, 28.05.2020, 17:48 (vor 38 Tagen) @ Martin Asal

Danke Martin,

ich habe es heute so gelöst:

Sub Zusammenstellen()

Dim i As Integer, letztezeile As String

letztezeile = 2

For i = 2 To 5 ' oder hier die Zahl der letzten Daten-Tabelle

Worksheets("Sammel").Range(Cells(letztezeile, 2), Cells(letztezeile + 59, 34)).Value = Worksheets(i).Range("B10:AH69").Value
letztezeile = letztezeile + 59

Next i
End Sub


gesamter Thread:

 RSS-Feed dieser Diskussion

powered by my little forum