Eine Excel-Makro, um alle Arbeitsmappen auf einmal zu schließen

Eine der ärgerlichsten Sachen in Excel schließt sofort viele Arbeitsmappen. Für jede Arbeitsmappe, die Sie geöffnet haben, müssen Sie die Arbeit zu aktivieren, schließen Sie es, und das Speichern von Änderungen zu bestätigen. Excel hat keine einfache Möglichkeit, sie alle auf einmal zu schließen. Dieses kleine Makro kümmert sich um dieses Ärgernis.

Wie die Makro funktioniert

In diesem Makro, schleift der Auflistung Workbooks durch alle geöffneten Arbeitsmappen. Da das Makro durch jede Arbeitsmappe Schleifen, speichert sie und schließt sie nach unten:

Sub Macro1 () 'Schritt 1: Erklären Sie Ihre variablesDim wb Als Workbook'Step 2: Schleife durch Arbeitsmappen, speichern und closeFor Jeder wb In Workbookswb.Close Savechanges: = TrueNext wbEnd Sub

Schritt 1 deklariert eine Objektvariable, die eine Arbeitsmappe-Objekt darstellt. Auf diese Weise können Sie durch alle geöffneten Arbeitsmappen aufzuzählen, die Erfassung ihre Namen, wie Sie gehen.

Schritt 2 einfach eine Schleife durch die geöffnete Arbeitsmappe, Speichern und Schließen sie. Wenn Sie sie nicht speichern möchten, ändern Sie die Savechanges Argument von True auf False.

Wie das Makro zu verwenden,

Der beste Ort, um dieses Makro zu speichern, ist in Ihrer persönlichen Makro-Arbeitsmappe. Auf diese Weise ist das Makro Ihnen immer zur Verfügung. Die persönliche Makro-Arbeitsmappe wird geladen, wenn Sie Excel starten. Im VBE Projektfenster wird Personal.xlsb benannt.

  1. Visual Basic-Editor aktivieren, indem Sie Alt + F11 drücken.

  2. rechts, klicken personal.xlb im Projektfenster.

  3. Wählen Sie Einfügen-Modul.

  4. Geben oder den Code in das neu erstellte Modul einfügen.

Wenn Sie nicht in Ihrem Projektfenster sehen personal.xlb, existiert es noch nicht. Sie werden ein Makro haben Rekord persönliche Makro-Arbeitsmappe als Ziel verwenden.

Um das Makro in Ihrer persönlichen Makro-Arbeitsmappe aufzeichnen, öffnen Sie das Dialogfeld Makro aufzeichnen. Im Makro speichern In Dropdown-Liste, wählen Sie Persönliche Makro-Arbeitsmappe. Dann einfach ein paar Zelle Klicks aufnehmen und die Aufnahme zu stoppen. Sie können die aufgezeichneten Makro verwerfen und es mit diesem ersetzen.

Ähnliche

Menü