Eine Excel-Makro eines bestimmten Benutzerdefinierte Arbeitsmappe zu öffnen,

Möchten Sie sich selbst oder Ihre Benutzer einen schnellen Weg zu suchen, um zu geben und eine Datei in Excel öffnen? Dieses Makro verwendet eine einfache Technik, die eine freundliche Dialogfeld geöffnet, in dem Sie zu durchsuchen und die Excel-Datei Ihrer Wahl zu öffnen.

Wie die Makro funktioniert

Dieses Makro öffnet das Dialogfeld, das Sie hier sehen, so dass der Benutzer zu durchsuchen und eine Excel-Datei öffnen.

Das Dialogfeld Öffnen durch das Makro aktiviert.
Das Dialogfeld Öffnen durch das Makro aktiviert.

Hier ist, wie dieses Makro funktioniert:

Sub Macro1 () 'Schritt 1: Definieren Sie einen String variableDim FName Als Variant'Step 2: GetOpenFilename Methode aktiviert Dialog boxFName = Application.GetOpenFilename (_FileFilter: = "Excel-Arbeitsmappen, * XL *.", _Title: = "Wählen Sie eine Arbeitsmappe öffnen ", _MultiSelect: = false) 'Schritt 3: Wenn eine Datei ausgewählt wurde, öffnen sie es Wenn FName lt;> False ThenWorkbooks.Open Dateiname: = FNameEnd IfEnd Sub

In Schritt 1 erklärt der Makro eine Variant-Variable, die den Dateinamen enthält, die der Benutzer auswählt. FName ist der Name Ihrer Variablen.

In Schritt 2 verwenden Sie die GetOpenFilename Methode ein Dialogfeld aufzurufen, dass Sie die Datei, die Sie benötigen, zu durchsuchen und auswählen können.

Die GetOpenFilename Methode unterstützt einige anpassbaren Parametern. Mit der Filefilter Parameter können Sie den Typ der Datei, die Sie suchen zu spezifizieren. Der Titel Parameter ermöglicht es Ihnen, den Titel zu ändern, das oben im Dialogfeld angezeigt. Der Multiselect-Parameter können Sie die Auswahl in eine Datei zu begrenzen.

Wenn der Benutzer eine Datei aus dem Dialogfenster auswählt, wird die FName variable mit dem gewählten Dateinamen gefüllt. In Schritt 3, überprüfen Sie für eine leere FName Variable. Wenn die Variable nicht leer ist, verwenden Sie die Open-Methode der Workbooks-Objekt die Datei zu öffnen.

Wie das Makro zu verwenden,

Um dieses Makro implementieren, können Sie es in einem Standardmodul kopieren und einfügen:

  1. Visual Basic-Editor Aktivieren von Alt + F11 auf Ihrer Tastatur drücken.

  2. rechts, klicken Sie auf Projekt / Arbeitsmappe Namen im Projektfenster.

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

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

  5. (Optional) Weisen Sie das Makro einer Schaltfläche.

Ähnliche

Menü