FileDialogFilter-Objekt (Office)

  • Artikel

Stellt einen Dateifilter in einem Dateidialogfeld dar, das über das FileDialog-Objekt angezeigt wird. Jeder Dateifilter bestimmt, welche Dateien in dem Dateidialogfeld angezeigt werden.

HinwBemerkungeneise

Verwenden Sie die Item-Methode mit der FileDialogFilters-Auflistung , um ein FileDialogFilter-Objekt zurückzugeben.

Verwenden Sie die Add-Methode, um der FileDialogFilters-Auflistung ein FileDialogFilter-Objekt hinzuzufügen.

Sie können die Erweiterungen zurückgeben, die ein FileDialogFilter-Objekt zum Filtern von Dateien mit der Extensions-Eigenschaft verwendet, und Sie können die Beschreibung des Filters mit der Description-Eigenschaft zurückgeben. Beide Eigenschaften sind jedoch schreibgeschützt. Wenn Sie die Erweiterung oder Beschreibung festlegen möchten, müssen Sie die Add-Methode verwenden.

Beispiel

Im folgenden Beispiel werden die Standardfilter des Dialogfelds Speichern unter durchlaufen, und die Beschreibung jedes Filters, der eine Microsoft Excel-Datei einschließt, wird angezeigt.

Sub Main() 
 
 'Declare a variable as a FileDialogFilters collection. 
 Dim fdfs As FileDialogFilters 
 
 'Declare a variable as a FileDialogFilter object. 
 Dim fdf As FileDialogFilter 
 
 'Set the FileDialogFilters collection variable to 
 'the FileDialogFilters collection of the SaveAs dialog box. 
 Set fdfs = Application.FileDialog(msoFileDialogSaveAs).Filters 
 
 'Iterate through the description and extensions of each 
 'default filter in the SaveAs dialog box. 
 For Each fdf In fdfs 
 
 'Display the description of filters that include 
 'Microsoft Excel files. 
 If InStr(1, fdf.Extensions, "xls", vbTextCompare) > 0 Then 
 MsgBox "Description of filter: " & fdf.Description 
 End If 
 Next fdf 
End Sub

Siehe auch

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.