[Word 2003]
Hallo liebe VBA-Freunde,
bisher hatte ich noch nichts mit VBA zu tun, nun möchte ich aber folgendes Problem zu lösen:
In einem Stammordner gibt es weitere Unterordner, die alphabetisch angelegt sind. In diesen Unterordnern liegen Dokumente verschiedener Typen, z.B. PDF-Dokumente, Word-Dokumente.
Manche Word-Dokumente enthalten Profile von Mitarbeitern. Deren Dateiname beginnt mit "Profil_". Diese Dokumente enthalten in der Fusszeile Angaben zum Firmennamen. Dieser hat sich nun geändert, und nun möchte ich automatisiert im Stammordner alle Unterordner bzw. alle darin enthaltenen Dateien durchlaufen. Ist die gefundene Datei ein Profil wie oben beschrieben, soll in der Fusszeile der Text der Firmenabgabe ersetzt werden.
Weiss jemand, wie so was geht? Im einzelnen interessiert mich, wie ich sauber alle Dateien nebst Unterordnern im Stammordner durchsuchen kann, und wie ich Text in einer Fusszeile ersetzen kann.
Es handelt sich um sehr viele Profile, d.h. das Makro sollte effizient sein.
Ich habe bereits das Tool "Globales Suchen und Ersetzen" gefunden, kann dieses Add-In jedoch nicht anwenden.
Wer kann mir helfen?
Vielen Dank im voraus!
Grüße,
Marco |