Copy, Paste von 2 Workbooks
15.01.2015 14:06:44
2
habe folgende Aufgabe: Daten von einem Workbook ins andere Kopieren, wobei die Quelldatei nicht _ geöffnet sein muss. Mein Versuch:
Sub CopyPaste()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set ext_wb = Workbooks.Open(ThisWorkbook.Path & "C:\Users\Tritec12\Desktop\zum_kopieren.xls")
ext_wb.Sheets("Hoja1").Range("A1:B10").Copy
ThisWorkbook.Sheets("Hoja1").Range("A3").PasteSpecial
ext_wb.Close
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
Wo liegt de Synthax Fehler.
danke für die Hilfe