Hallo Spezialisten,
ich habe folgendes Makro mit dem Recorder aufgezeichnet und dort hat es geklappt:
Dim Path As String
Dim Workbook As String
Path = ThisWorkbook.Path
Workbooks.Open Path & "\RM München_V_1_1.xls"
Range("A33:AZ1000").Select
Selection.Copy
Windows("RM GESAMT_V_1_0.xls").Activate
Sheets("RM München").Select
Range("A33").Select
ActiveSheet.Paste '>
Windows("RM München_V_1_1.xls").Activate
ActiveWindow.Close
Anschließend habe ich versucht, über einen Button das Makro auszuführen, aber es erscheint:
Laufzeitfehler "-214741848 (800010108)":
Die Methode "Paste" für das Objekt"_Worksheet" ist fehlgeschlagen
Verwunderlich ist, dass er die Daten dennoch einfügt.
Wer kann helfen?
Grüße Erwin