So verwenden Sie die GetOpenFilename-Methode in Excel 2016 VBA

So verwenden Sie die GetOpenFilename-Methode in Excel 2016 VBA

Wenn Ihre VBA - Prozedur der Benutzer nach einem Dateinamen zu fragen braucht, Sie könnten die Funktion InputBox verwenden und lassen Sie den Excel - Benutzer eine Eingabe machen. Ein Eingabefeld ist jedoch normalerweise nicht das beste Werkzeug für diese Aufgabe, da es den meisten Benutzern schwerfällt, sich Pfade, umgekehrte Schrägstriche, Dateinamen und Dateierweiterungen zu merken. Mit anderen Worten, es ist viel zu einfach, einen Dateinamen einzugeben.

Um dieses Problem besser zu lösen, verwenden Sie die GetOpenFilename-Methode des Application-Objekts, die sicherstellt, dass Ihr Code einen gültigen Dateinamen einschließlich des vollständigen Pfads erhält. Die Methode GetOpenFilename zeigt das bekannte Dialogfeld Öffnen an (ein toter Klingelton für das Dialogfeld Excel wird angezeigt, wenn Sie Datei → Öffnen → Durchsuchen wählen).

Die GetOpenFilename-Methode öffnet die angegebene Datei nicht wirklich. Diese Methode gibt einfach den vom Benutzer ausgewählten Dateinamen als String zurück. Dann können Sie Code schreiben, um mit dem Dateinamen zu tun, was Sie wollen.

Die Syntax für die GetOpenFilename-Methode

Die offizielle Syntax der GetOpenFilename-Methode lautet wie folgt:

object.GetOpenFilename ([fileFilter], [filterIndex],
  [Titel],[ButtonText], [Mehrfachauswahl])

Die Methode GetOpenFilename verwendet die optionalen Argumente unten.

Streit Was es macht
Dateifilter Bestimmt die Dateitypen, die im Dialogfeld
angezeigt werden (z. B. *.TXT). Sie können mehrere Filter angeben, aus denen der Benutzer
auswählen kann.
FilterIndex Legt fest, welcher der Dateifilter das Dialogfeld
standardmäßig anzeigt .
Titel Gibt die Beschriftung für die
Titelleiste des Dialogfelds an .
Schaltflächentext Ignoriert (wird nur für die Macintosh-Version von Excel verwendet).
Mehrfachauswahl Bei True kann der Benutzer mehrere Dateien auswählen.

Ein GetOpenFilename-Beispiel

Das Argument fileFilter bestimmt, was in der Dropdown-Liste Dateityp des Dialogfelds angezeigt wird. Dieses Argument besteht aus Paaren von Dateifilterzeichenfolgen, gefolgt von der Wildcard-Dateifilterspezifikation, wobei die einzelnen Teile und Paare durch Kommas getrennt werden. Wenn es weggelassen wird, wird dieses Argument standardmäßig wie folgt verwendet:

Alle Dateien (*.*), *.*

Beachten Sie, dass diese Zeichenfolge aus zwei Teilen besteht, die durch ein Komma getrennt sind:

Alle Dateien (*.*)

und

*.*

Der erste Teil dieser Zeichenfolge ist der Text, der in der Dropdown-Liste Dateityp angezeigt wird. Der zweite Teil bestimmt, welche Dateien das Dialogfeld anzeigt. *.* bedeutet beispielsweise alle Dateien.

Der Code im folgenden Beispiel öffnet ein Dialogfeld, in dem der Benutzer nach einem Dateinamen gefragt wird. Das Verfahren definiert fünf Dateifilter. Beachten Sie, dass die VBA-Zeilenfortsetzungssequenz verwendet wird, um die Filtervariable einzurichten. dies hilft, dieses ziemlich komplizierte Argument zu vereinfachen.

Sub GetImportFileName ()
  Dim Finfo als String
  Dim FilterIndex As Long
  Titel als String dimmen
  Dim FileName als Variante
'Liste der Dateifilter einrichten
  FInfo = „Textdateien (*.txt),*.txt“ & _
      „Lotus-Dateien (*.prn),*.prn“, & _
      „Kommagetrennte Dateien (*.csv),*.csv“ & _
      „ASCII-Dateien (*.asc),*.asc“, & _
      "Alle Dateien (*.*),*.*"
' Standardmäßig *.* anzeigen
  FilterIndex = 5
'Beschriftung des Dialogfelds festlegen
  Title = „Wählen Sie eine zu importierende Datei“
' Dateinamen abrufen
  FileName = Application.GetOpenFilename (FInfo, _
    FilterIndex, Titel)
' Behandeln von Rückgabeinformationen aus dem Dialogfeld
  Wenn Dateiname = False Then
    MsgBox „Es wurde keine Datei ausgewählt.“
  Anders
    MsgBox „Sie haben ausgewählt“ & Dateiname
  Ende Wenn
End Sub

Hier ist das Dialogfeld, das Excel anzeigt, wenn Sie dieses Verfahren ausführen. Die Darstellung kann je nach verwendeter Windows-Version und eingestellten Anzeigeoptionen variieren.

So verwenden Sie die GetOpenFilename-Methode in Excel 2016 VBA

Die Methode GetOpen Filename zeigt ein anpassbares Dialogfeld an und gibt den Pfad und den Namen der ausgewählten Datei zurück. Es öffnet die Datei nicht.

In einer echten Anwendung würden Sie mit dem Dateinamen etwas Sinnvolleres machen. Sie können es beispielsweise mit einer Anweisung wie dieser öffnen:

Workbooks.Open FileName

Beachten Sie, dass die Variable FileName als Variant-Datentyp deklariert ist. Wenn der Benutzer auf Abbrechen klickt, enthält diese Variable einen booleschen Wert (False). Andernfalls ist FileName eine Zeichenfolge. Daher behandelt die Verwendung eines Variant-Datentyps beide Möglichkeiten.


Smartsheet 9.1.1

Smartsheet 9.1.1

Smartsheet ist eine dynamische Arbeitsplattform, mit der Sie Projekte verwalten, Arbeitsabläufe erstellen und mit Ihrem Team zusammenarbeiten können.

SharePoint

SharePoint

SharePoint ist ein webbasiertes Kollaborationssystem, das eine Vielzahl von Workflow-Anwendungen, „Listen“-Datenbanken und anderen Webkomponenten sowie Sicherheitsfunktionen verwendet, um die Zusammenarbeit von Unternehmensgruppen zu steuern.

Ewiger Kalender 1.0.38/1.0.36

Ewiger Kalender 1.0.38/1.0.36

Van Nien Calendar ist eine Kalenderanzeigeanwendung auf Ihrem Telefon, die Ihnen hilft, schnell das Monddatum auf Ihrem Telefon zu sehen und so Ihre wichtige Arbeit zu ordnen.

Microsoft Outlook 2021

Microsoft Outlook 2021

Microsoft Outlook ist eine Geschäfts- und Produktivitätsanwendung, die von der Microsoft Corporation entwickelt wurde.

ClickUp

ClickUp

ClickUp ist eine der am höchsten bewerteten Produktivitätsplattformen für jedes Unternehmen. Große Unternehmen wie Google, Booking.com, San Diego Padres und Uber nutzen ClickUp, um die Produktivität am Arbeitsplatz zu steigern.

PDF-XChange Viewer 2.5.322.10

PDF-XChange Viewer 2.5.322.10

PDF ist zu einem häufig verwendeten Format zum Lesen, Erstellen und Senden von Textdokumenten geworden. Im Gegenzug hat die Zahl der für diese Art der Dokumentation eingesetzten Programme zugenommen. PDF-XChange Viewer gehört zu einer wachsenden Zahl von PDF-Viewern.

Apache OpenOffice

Apache OpenOffice

Apache OpenOffice bietet eine vollständige Suite von Office-Anwendungen, die mit Microsoft 365 konkurrieren können, insbesondere in Excel, PowerPoint und Word. Es ermöglicht Ihnen eine effektivere Verwaltung Ihrer Projekte und unterstützt mehrere Dateiformate.

Laden Sie iTaxviewer 1.8.7 herunter

Laden Sie iTaxviewer 1.8.7 herunter

Die iTaxViewer-Software ist heute die beliebteste Software zum Lesen von XML-Dateien. Bei dieser Software handelt es sich um eine Anwendung zum Lesen elektronischer Steuererklärungen im XML-Format des General Department of Taxation.

Nitro PDF Reader

Nitro PDF Reader

Nitro PDF Reader ist ein praktischer PDF-Editor, der alle grundlegenden Aufgaben abdeckt, die die meisten Menschen täglich mit PDF-Dokumenten ausführen.

Foxit Reader 12

Foxit Reader 12

Foxit Reader ist in erster Linie ein PDF-Reader und ermöglicht Ihnen außerdem, PDF-Dateien zu erstellen, sie zu signieren, zu bearbeiten und Anmerkungen hinzuzufügen. Es funktioniert auf Betriebssystemen, es gibt Plugins für verschiedene Programme aus dem Microsoft Office-Paket.