bräuchte mal wieder eure Hilfe.
Ich möchte aus Tabelle2 den Bereich N2:Q2 in Tabelle1 in die zweite Zeile nach der letzten gefüllten Zeile in Spalte A kopieren.
Wäre echt klasse wenn mir da einer von euch weiter helfen könnte.
mfg Blue Bird
Public Sub Kopieren()
Dim loLetzte As Long
With Worksheets("Tabelle1")
loLetzte = .Cells(.Rows.Count, 1).End(xlUp).Row + 2
Worksheets("Tabelle2").Range("N2:Q2").Copy .Cells(loLetzte, 1)
End With
End Sub
Gruß WernerDie 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