Gewusst wie: Ausführen eines Makros auf mehrere Dateien in MS Word

June 5

Da Arbeit und persönliche Projekte problemlos über ein einzelnes Word-Dokument hinausgehen können, ist es sinnvoll, Ihre Makros Arbeit an mehreren Dokumenten ermöglichen. Dazu können Sie mithilfe von Visual Basic Befehl "Öffnen" in Word eine Datei laden, auf der Sie das Makro ausführen möchten. Verarbeiten Sie die Datei mit dem Makro, z. B. Ersetzen von Text oder excerpting, um eine Vorschau eines Dokuments zu bieten. Verwenden Sie nach dem Ausführen des Makros, Visual Basic Befehl "Schließen", um das Dokument auf der Festplatte zu speichern.

Anweisungen

1 Klicken Sie auf die Schaltfläche "Office" Befehl "Öffnen", dann zu navigieren Sie, und doppelklicken Sie auf eine Datei mit einem Makro, das Sie für mehrere Dateien ausführen möchten. Klicken Sie auf die Registerkarte "Entwicklertools" "Makros"-Schaltfläche, um eine Liste der Makros im Dokument anzuzeigen, die Sie gerade geladen.

2 Klicken Sie den Namen eines Makros klicken Sie auf "Bearbeiten", um die integrierte Entwicklungsumgebung Visual Basic eingeben. Geben Sie Folgendes, bevor Sie die erste Anweisung des Makros. Diese Aussagen Benutzeraufforderung des Makros nach einem Dateinamen auf dem das Makro ausgeführt. Die Anweisung "Während" beginnt eine Schleife, in der die Funktion "Open" die Word-Datei, die vom Benutzer angegebenen öffnet.

Dim x

X = InputBox ("Enter Filename")

Während (X-<> "")

Documents.Open x

'--CODE BEGINNT HIER

3 Geben Sie über den Kommentar "IHR CODE beginnt hier" mit Text zur Beschreibung des Makros Zweck. Beispielsweise wenn Sie ein Makro, das ersetzt jedes Vorkommen des Wortes "Marianne" mit "Ginger" geschrieben haben, geben Sie "Begin" Suchen/Ersetzen"Code für Marianne/Ginger Text'"

4 Geben Sie die folgenden nach der letzten Anweisung Ihres Makros. Diese Aussagen speichern und schließen Sie die Datei durch die "Offene" Anweisung geöffnet und Ihr Makro Benutzeraufforderung für einen anderen Dateinamen. Die "Wend"-Anweisung beendet die Schleife, die mit der Anweisung "Während" begann.

ActiveDocument.Close wdSaveChanges

X = InputBox ("Enter Filename")

Wend

5 Das "Wort" Symbol auf der Windows-Taskleiste, um zu Word zurückzukehren klicken Sie die Schaltfläche "Makros" auf die Registerkarte "Entwickler" und doppelklicken Sie auf den Namen des Makros, um Sie auszuführen.

6 Geben Sie den Namen einer Datei, die Sie Ihr Makro ausgeführt möchte, wenn der "Enter Filename" eingeben, die Sie weiter oben schrieb angezeigt wird. Drücken Sie "Enter", um das Makro die Datei verarbeiten zu lassen.

7 Wiederholen Sie den vorhergehenden Schritt, bis Sie den Namen der letzten Datei eingegeben haben, auf denen Sie das Makro ausführen möchten. Das nächste Mal die Eingabeaufforderung "Enter Filename" angezeigt wird, drücken Sie "Enter" ohne Eingabe eines Dateinamens. Das Makro wird beendet.