Hallo liebe Forenuser,
ich habe ein kleines Problem mit dem Auslesen von Daten aus Dateien. Vor langer Zeit hat mir hier mal jemand weitergeholfen, aber nicht ganz so, dass es komplett funktioniert.
Ich habe 4 Dateien in dem Verzeichnis E:\ stehen. Diese Dateien heißen immer:
DU_BG_exp.xml
DU_ET_exp.xml
DO_BG_exp.xml
DO_ET_exp.xml
In jeder dieser Dateien kommt im gesamten Text irgendwo eine Zeile
IMATNR 6677888 /IMATNR
vor (File mit Beispiel ist upgeloadet).
https://www.herber.de/bbs/user/29468.txt
Die Zahl (in diesem Beispiel 6677888) dazwischen ist immer 7stellig und in jeder der 4 Dateien unterschiedlich; auch die Zeile kann eine andere sein, in der die Zahl steht!
Nun habe ich ein Excel-Sheet. Darin habe ich ein Tabellenblatt mit einem Button. Mit einem Klick auf den Button möchte ich, dass:
1. die erste Datei im oben genannten Verzeichnis geöffnet wird
2. der Text zwischen den "Tags" ausgelesen wird
3. und danach dieser Text im Excel-Tabellenblatt in die Zelle D40 geschrieben wird
Das alles mit allen 4 Dateien, nur der jeweilige Text zwischen den "Tags" soll in andere Zellen ins Excel-Tabellenblatt wandern (D40, D41, D45, D48).
Kann mir hier jemand weiterhelfen. Ich bin leider Anfänger mit VBA und das wäre mir eine große Hilfe.
Danke im Voraus.
Liebe Grüße,
Helmut