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ß Werner