Ich habe folgenden Code:
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim myRow As Long
Dim myLastRow1 As Long
Dim myLastRow2 As Long
With Sheets("Tabelle1")
myLastRow1 = .Cells(Rows.Count, 2).End(xlUp).Row
If myLastRow1 0 Then
With Sheets("Tabelle2")
myLastRow2 = .Cells(Rows.Count, 2).End(xlUp).Row
If myLastRow2
nun möchte ich das nur die Werte in Tabelle2 kopiert werden und erst in Spalte C ab Zeile 11 eingefügt werdenvielen Dank schon mal eure Hilfe