wie bekomme ich nur die Werte kopiert und die Formatierung soll bleiben!
Sheets("Tabelle1").Range("A2:A12").Copy Sheets("Tabelle2").Cells(10, 2)
Gruß
Sheets("Tabelle1").Range("A2:A12").Copy
Sheets("Tabelle2").Cells(10, 2).PasteSpecial Paste:=xlValues
MfG Tom
Sheets("Tabelle1").Range("A2:A12").Copy
Sheets("Tabelle2").Cells(10, 2).PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
MfG Tom