Dialog zur Auswahl von Dateien anzeigen

Auch wenn Access eigentlich alles an Bord hat, was man zum Bearbeiten von Daten benötigt, so muss man sich doch das eine oder andere hinzuprogrammieren. Dazu gehört eine Funktion, mit der Sie einen Dialog zum Auswählen von Dateien anzeigen können. Dieser Artikel zeigt die einfachste versionsübergreifende Lösung dieser Aufgabe.

Beispieldatenbank

Die Beispieldatenbank zu diesem Artikel heißt 1107_DateiOeffnenDialog.mdb. Sie finden diese im Download zu diesem Artikel.

Wozu Dateien auswählen

Wenn Sie Anwendungen mit Access programmieren, werden Sie früher oder später eine Funktion zum Auswählen von Dateien anbieten müssen. Anlässe dazu gibt es genug:

  • Der Benutzer soll eine Datei auswählen, deren Daten importiert werden sollen (Excel-Tabellen, Textdateien, XML-Dokumente).
  • Sie möchten Bilder mit der Datenbank verwalten, ohne die Bilder in der Datenbank zu speichern. Dazu müssen Sie die Dateinamen samt Pfad in einer Tabelle speichern und diese dazu vorher auswählen.
  • Sie möchten dem Benutzer die Möglichkeit bieten, nach dem Verschieben des Backends einer Datenbank selbst nach dieser Datei zu suchen (siehe Aktion beim Start: Das Autoexec-Makro).

Verschiedene Möglichkeiten

Es gibt die verschiedene Varianten, um einen Datei öffnen-Dialog anzuzeigen. Früher verwendete man dazu das Common Dialogs-Steuerelement, neuere Access-Versionen bieten die FileDialog-Klasse für diesen Zweck an. Es gibt jedoch auch eine Variante, die in allen Access-Versionen arbeitet. Diese steckt in einer verborgenen und nicht dokumentierten Klasse, ist aber sehr leicht aufzurufen.

Datei öffnen-Dialog der Wizhook-Klasse

Um diese Klasse namens Wizhook zu aktivieren, platzieren Sie in einer neuen Prozedur die folgende Anweisung:

WizHook.Key = 51488399

Danach fügen Sie eine Anweisung ein, die den Befehl GetFileName dieser Klasse aufruft. Wie Bild 1 zeigt, liefert IntelliSense schnell eine Liste aller verfügbaren Parameter.

Parameter der Funktion GetFileName

Access [basics]

Unser exklusives Angebot für Dich!

Access im Unternehmen
7,90 € im Monat*

(Das Abo ist jederzeit monatlich kündbar)

Hier geht’s weiter →

Die ersten 4 Wochen kostenlos testen – voller Zugriff auf alle Artikel, vollständigen Code und Beispieldatenbanken. Kein Risiko: Wenn es nicht passt, kündigst Du einfach innerhalb der ersten vier Wochen.

PayPal VISA Mastercard SEPA
Kostenlos & unverbindlich

Oder hast Du eine konkrete Frage zu Deiner eigenen Access-Anwendung?

Vielleicht stellt Deine Anwendung Dich vor eine Herausforderung, zu der Du bisher keine Lösung findest. Schlechte Performance, kein ausreichender Zugriffsschutz, Du bist unsicher über Dein Datenmodell oder Dein Code liefert unerklärliche Fehler?

In unserem kostenlosen Access-Audit schaut sich André Minhorst persönlich gemeinsam mit Dir Deine Lösung per Zoom an – und zeigt Dir, wo Datenmodell, VBA-Code, Ergonomie und Sicherheit Optimierungspotenzial bieten.

Jetzt kostenloses Access-Audit anfordern →