Ich möchte nur die Werte kopieren und habe eine ursprüngliche Prozedur wie folgt geändert:
alt:
Range(Cells(5, 1), Cells(intLastRow2, 40)).Copy
Workbooks("Test.xls").Activate: Worksheets("laufende Projekte").Select
Dim lC As Range
Set lC = Cells(Rows.Count, 1).End(xlUp)
lC.Offset(1, 0).Select
ActiveSheet.Paste
neu:
Range(Cells(5, 1), Cells(intLastRow2, 40)).Copy
Workbooks("Test.xls").Activate: Worksheets("laufende Projekte").Select
Dim lC As Range
Set lC = Cells(Rows.Count, 1).End(xlUp)
lC.Offset(1, 0).Select
ActiveSheet.PasteSpecial Paste:=xlPasteValues
leider erhalte ich eine Laufzeitfehlermeldung.
Wie ist die korrekte schreibweise, wenn ich nur den Wert einfügen will (keine Formel), damit kein Laufzeitfehler generiert wird?
Danke und Gruss
Gregor