Thema: Aufruf des GetOpenFilename-Dialogs

Home

Gruppe

Dialog

Problem

Der GetOpenFileName-Dialog soll mit den Dateifiltern Text, Word und Excel aufgerufen werden.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.

StandardModule: Modul1

Sub TxtAndXl()
   Dim var As Variant
   Dim sFiles As String
   sFiles = "Text-Files (*.txt), *.txt, "
   sFiles = sFiles & "Word-Files (*.doc), *.doc, "
   sFiles = sFiles & "Excel-Files(*.xls), *.xls"
   var = Application.GetOpenFilename(sFiles)
End Sub

Beiträge aus dem Excel-Forum zu den Themen Dialog und Anwendung

Laufzeitfehler 1004: Anwendungs- oder objektorient	xlDialogInsertHyperlink.show
Arbeitmappen über Dialogfeld zusammen fassen	5.0 Dialog
Speichern unter Dialog in Word aufrufen inkl. Pfad	Druckerdialog
Dateityp im "Speichern unter"-Dialog vorgeben	Makro stoppen, wenn Excel-Dialog?
Exel immer in neuer Anwendung öffnen	xlDialogOpen anpassen
Klick in definierten Rangebereich startet Dialog	anwendungen öffnen
xlDialogOpen bei Excel 2007 funzt nicht	FileDialog inkl. Anklicken von Desktop, Eigene D.
Grösse Dialogfenster der InputBox	VBA Anwendung schließen
Beliebige Anwendung in VBA schließen	Dialogfeld unterdrücken
Dialog "permanently delete sheets" unterbinden	Format-Dialog funktioniert nicht mehr
Dialog "Verknüpfung aktualisieren"	Ordnerdialog und Dateidialog
Ordnerdialog und dateidialog	Ordnerdialog und Dateidialog
Filedialog	AW: Fertige Anwendungen/Formulare
Herber/Beispiele/Dialoge/Checkbox/137601	Fertige Anwendungen/Formulare.
Bilder bei Click im Dialogfeld	Anwendungs- oder objektori. Fehler
Suchdialog über VBA aufrufen	mit Wert aus Combobox Dialog öffnen
Diagramm als Grafik mit Speicherdialog exportieren	Dialogfenster zum kopieren
FileDialog-Objekt unter O2k	Laufende Anwendung ermitteln und beenden
Laufzeitfehler 1004, Anwendungs und obj.	Abrage von Dialogfeldargumenten
eine datei in anwendung	Datei Auswählen Dialog (Application.FileDialog)
Diagramme in Vektorformat für andere Anwendungen?	xlDialogOpen/FindFile ohne Open
Dialogfeld zum pdf öffnen	Dialogfeld schließen, wenn Benutzer nichts eingibt
Nur eine Mappe pro Anwendung	Problem mit ApplicationDialogs
Anwendung im Vordergrund	Das Dialogfeld "sortieren" aufrufen?
Keine Dialogbox bei SaveAs	Dialogbox