Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Dateinamen filtern

Gruppe

Filtern

Problem

Wie kann ich beim VBA-Aufruf des Öffnen-Dialogs die angezeigten Dateien auf Typen, beispielsweise Textdateien, begrenzen?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub FileOpen()
   Dim vFile As Variant
   vFile = Application.GetOpenFilename( _
      "Textdateien (*.txt),*.txt")
   If vFile = False Then Exit Sub
   Workbooks.Open vFile
End Sub