Clever-Excel-Forum

Normale Version: VBA Frage
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2
Hallo zusammen,

ich habe hier eine Arbeitsmappe mit Daten verschiedener Länder.
Ich möchte mit einem Makro aus der bestehenden Gesamtdatei für jedes Land eine eigene Datei erstellen in der nur die Daten des jeweiligen Landes enthalten sind. 

Disclaimer: Das habe ich eigentlich auch schon geschafft --> also der Code steht und sollte so funktionieren.

Allerdings habe ich einen Laufzeitfehler und finde ums verrecken nicht wieso. 

Könnte jemand von euch bitte mal drauf schauen? 

[attachment=38866]


Der Code ist in Modul 1.
Hallo Max,

das ist jetzt mal etwas verwirrend...
Wieso schreibst Du nicht da weiter https://www.clever-excel-forum.de/thread...#pid230246 ?

Da schreibst Du auf dein Problem: 
Zitat:Ich habe es jetzt so weit bekommen, dass er die Datei erzeugt und auch öffnet. 
Wie genau verschweigst Du...

Aber dein aktueller Code bleibt genau da hängen, weil Du den von mir vermuteten Fehler nicht korrigiert hast.
Ändere den Pfad in
Code:
    strPath = "C:\Users\MUSTERMANN\Desktop\Test\" 'Ordnerpfad wohin die Dateien gespeichert werden sollen
Und dann läuft's...

Gruß,
Lutz
Habe ich gemacht.

Jetzt hängt er bei:
Sheets(strWorksheet_Data).Select

*in der echten Datei.

Die Testdatei geht jetzt.
Und wo ist der Unterschied zwischen "echter Datei" und Testdatei?
Die Bezeichnung der Blätter.

Das Blatt heißt dort AOP_FY22

Und hier wirft er den Fehler --> erzeugt vorher die Datei.

Sheets(strWorksheet_AOP_FY22).Select
Hast Du im Code
Code:
    strWorksheet_Data = "Data"
an AOP_FY22 angepasst?

Wie lautet der Fehler?

Was zeigt der Editor, wenn Du beim Debuggen mit der Maus über strWorksheet_AOP_FY22 gehst?
strWorksheet_AOP_FY22 = "AOP_FY22"

Laufzeitfehler 9, außerhalb des gültigen Bereichs.
Postest Du nochmal den Code.

Hast Du am Beginn des Codes ein "Option explicit" stehen? Damit wirst Du gezwungen, alle Variablen zu dimensionieren.
EDIT: bin dumm, es geht.

Hatte strCCWorksheet_AOP_FY22 = "AOP_FY22" da stehen.
Hättest Du "Option explicit" am Beginn des Codes stehen, wäre das nicht passiert  21.

Zum Studium:
https://www.online-excel.de/excel/singsel_vba.php?f=4

Gruß,
Lutz
Seiten: 1 2