Freigeben über


Application.GetOpenFilename-Methode (Excel)

Zeigt das standardmäßige Dialogfeld Öffnen an und ruft einen Dateinamen vom Benutzer ab, ohne Dateien versehentlich zu öffnen.

Syntax

expression.GetOpenFilename (FileFilter, FilterIndex, Title, ButtonText, MultiSelect)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
FileFilter Optional Variant Eine Zeichenfolge, die Dateifilterkriterien angibt.
FilterIndex Optional Variant Gibt die Indexanzahl der standardmäßigen Dateifilterkriterien an, und zwar von 1 zur Anzahl der in FileFilter angegebenen Filter. Wenn dieses Argument nicht angegeben oder größer als die Anzahl der vorhandenen Filter ist, wird der erste Dateifilter verwendet.
Titel Optional Variant Gibt den Titel des Dialogfelds an. Wenn dieses Argument ausgelassen wird, lautet der Titel „Open“.
ButtonText Optional Variant Nur Macintosh.
MultiSelect Optional Variant True, damit mehrere Dateinamen ausgewählt werden können. False, damit nur ein Dateiname ausgewählt werden kann. Der Standardwert ist False.

Rückgabewert

Variant

Hinweise

Diese im Argument FileFilter weitergegebene Zeichenfolge besteht aus Dateifilter-Zeichenfolgenpaaren, gefolgt von der MS-DOS-Platzhalter-Dateifilterspezifikation, wobei jeder Teil und jedes Paar durch Kommas voneinander getrennt sind. Jedes einzelne Paar ist im Dropdown-ListenfeldDateityp aufgeführt. Die folgende Zeichenfolge gibt beispielsweise zwei Dateifilter an: text und addin:

"Text Files (*.txt), *.txt,Add-In Files (*.xla), *.xla"

Trennen Sie zum Verwenden mehrerer MS-DOS-Platzhalterausdrücke für einen einzelnen Dateifiltertyp die Platzhalterausdrücke mit Semikolons, beispielsweise "Visual Basic Files (*.bas; *.txt), *.bas;*.txt".

Wenn FileFilter ausgelassen wird, wird dieses Argument auf die Standardeinstellung "All Files (*.*), *.*" zurückgesetzt.

Diese Methode gibt den ausgewählten Dateinamen oder den durch den Benutzer eingegebenen Namen zurück. Der zurückgegebene Name enthält möglicherweise eine Pfadspezifikation. Wenn MultiSelectTrue ist, ist der Rückgabewert ein Array der ausgewählten Dateinamen (auch wenn nur ein Dateiname ausgewählt wurde). Gibt False zurück, wenn der Benutzer das Dialogfeld abbricht.

Diese Methode ändert möglicherweise das aktuelle Laufwerk bzw. den aktuellen Ordner.

Beispiel

In diesem Beispiel wird das Dialogfeld Öffnen mit dem auf Textdateien festgelegten Dateifilter gezeigt. Wenn der Benutzer einen Dateinamen auswählt, zeigt der Code diesen Dateinamen in einem Meldungsfeld an.

fileToOpen = Application _ 
 .GetOpenFilename("Text Files (*.txt), *.txt") 
If fileToOpen <> False Then 
 MsgBox "Open " & fileToOpen 
End If

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.