Das Schließen und Öffnen Methode in Excel VBA zu schließen und öffnen Arbeitsmappen verwendet werden. Denken Sie daran, die Auflistung Workbooks alle die Arbeitsmappe Objekte enthält, die zur Zeit geöffnet sind.

Platzieren Sie eine Befehlstaste auf dem Arbeitsblatt und fügen Sie die folgenden Codezeilen:

  1. Die Codelinie close-open.xlsm unten schließt.

Workbooks("close-open.xlsm").Close

  1. Die Codelinie schließt unter dem ersten geöffnet / erstellt Arbeitsmappe.

Workbooks(1).Close

  1. Die Codezeile schließt unter dem aktiven Arbeitsbuch.

ActiveWorkbook.Close

  1. Die Codezeile schließt unter alle Arbeitsmappen, die geöffnet sind.

Workbooks.Close

  1. Der Code Zeile unter sales.xlsx öffnet.

Workbooks.Open ("sales.xlsx")

Hinweis: Sie können nur geöffnet sales.xlsx ohne den Pfad der Datei angeben, wenn es in Ihrem Standard-Speicherplatz gespeichert ist. Um den Standard-Speicherort zu ändern, auf der Registerkarte Datei auf Optionen, Speicher.

  1. Sie können auch die GetOpenFilename Methode des Application-Objekts verwenden, um den Standard-Öffnen-Dialog angezeigt werden soll.

Dim MyFile As String

MyFile = Application.GetOpenFilename()

  1. Öffnen Wählen Sie eine Datei und klicken Sie auf.

GetOpenFilename Method

Hinweis: GetOpenFilename eigentlich nicht die Datei öffnen.

  1. Als nächstes können Sie die Arbeitsmappe wie gewohnt öffnen.

Workbooks.Open (MyFile)