PasteSpecial
03.09.2007 17:07:00
Felix
folgende Frage: kann mir jmd. sagen, was an der zweiten Zeile falsch ist? Sobald ich cells durch bspw. "A1:H13" ersetze, funktioniert es wieder. Liegt das an der PasteSpecial-Funktion?
Sheets("Sheet1").Range(Cells(1, 1), Cells(13, 1)).Copy
Sheets("Sheet2").Range(Cells(1, 1), Cells(13, 1)).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _ SkipBlanks _
:=False, Transpose:=False
Ich möchte eigentlich cells(1,1) und cells(13,1) durch einen Zähler ersetzen, um das ganze flexibel zu halten...wenn ich aber schon an dieser simplen Sache scheiter, weiß ich leider nicht wie?
Viele Grüße
Felix