Makro bringt Fehler beim Kompilieren

Hallo Liebe Exelfreunde
Hab mal wieder ein Problem, bei welchen ich Eure Hilfe bräuchte. . Für das übertragen von Daten _
aus einer Exelmappe in eine andere habe ich mir mit Hilfe des Internets ein Makro gebaut. Aber _
leider funktioniert es nur Teilweise. Wenn ich es auführe, wird die entsprechende Datei geö _ ffnet aber es kommt die Meldung "Fehler beim Kompilieren" Syntaxfehler. Die Zeile


wbStart.Sheets("Basic_list_the_original_066.xltm").Sheets("Lohn aufbereitet").Range("Y1:AG329").Copy Destination:=wbZiel.Sheets("test.xlsm").Sheets("Tabelle1").Range(A1:Y329")

, ist dann rot hervorgehoben.
Habe schon einiges probiert, ohne Ergebnis. Erkennt Ihr hier eventuell den Fehler in Schreibweise usw. Die Angaben der Mappen und Pfade sollten stimmen.
Hier noch das ganze Makro


Sub Datei_Kopieren()
Dim wbStart, wbZiel As Workbook
Set wbStart = ActiveWorkbook
Set wbZiel = Workbooks.Open("G:\Grundliste Original\test\test1.xlsm")
wbStart.Sheets("Basic_list_the_original_066.xltm").Sheets("Lohn aufbereitet").Range("Y1:AG329"). _
_
_
Copy Destination:=wbZiel.Sheets("test.xlsm").Sheets("Tabelle1").Range(A1:Y329")
End Sub

Vielen Dank im voraus.
LG Robert

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Robert,
ich vermute Du hast nicht komplett gelesen.
Du bist im falschen Forum. Bildbearbeitung ist ein anderes.
Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.
Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.
Ich baue keine Datei nach, die Zeit hat schon jemand investiert.
Schau mal hier
Eine hochgeladene Arbeitsmappe erhöht die Wahrscheinlichkeit, dass Du eine Lösung für Dein Problem erhältst.
Erstelle folglich bitte eine Demomappe, aus der deine Aufgabenstellung klar erkennbar ist und lade diese hoch.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten ändern. Schaue Datei
http://hajo-excel.de/gepackt/fremd/Datei_verschluesseln.zip
Falls Du den Download des Forums nicht benutzen möchtest beachte bitte: von unsicheren Servern file-upload lade ich keine Datei herunter (lt. Einschätzung meines Virenprogramms)
Das ist nur meine Meinung zu dem Thema.
Falls Link nicht ausgeführt wird:
1. Link kopieren
2. rechte Maustaste neues Fenter.
3. Umschaltstaste drücken und Klick auf den Link
4. STRG+ Link mit Maus aktivieren
Gruß Hajo

Sub Datei_Kopieren() Dim wbZiel As Workbook Set wbZiel = Workbooks.Open("G:\Grundliste Original\test\test1.xlsm") ThisWorkbook.Worksheets("Lohn aufbereitet").Range("Y1:AG329").Copy _ wbZiel.Worksheets("Tabelle1").Range("A1") Set wbZiel = Nothing End Sub

Beliebteste Forumthreads (12 Monate)

Makro bringt Fehler beim Kompilieren

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

306 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Makro bringt Fehler beim Kompilieren

10 Beiträge zum Forumthread Beiträge zu diesem Forumthread

306 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread