Ordnerauswahl mit FileDialog bei der die enthaltenen Dateien angezeigt werden

24/11/2008 - 10:11 von Matthias Popp | Report spam
Hallo Newsgroup,

ich möchte den Anwendern meiner Access-Applikation mittels VBA einen
Datei-Dialog zur Verfügung stellen, mit dem Sie einen Ordner auswàhlen
sollen.
Dazu bin ich auf das FileDialog Objekt gestoßen, mit dem das realisiert
werden kann.

Dim Pfad as String
Dim FD as FileDialog
set FD = Application.FileDialog(msoFileDialogFolderPicker)
If FD.Show Then
Pfad = FD.SelectedItems(1) & "\"


Nun wàre es für meine Anwender wichtig, dass Sie bei der Auswahl des Pfades
erkennen können, welche Dateien sich darin befinden.
Leider gelingt es mir nicht, den Dialog so aufzurufen, dass das
gewàhrleistet ist.
Man bekommt immer nur Verzeichnisse angezeigt, ohne deren Inhalt sehen zu
können.

Geht das was ich mir vorstelle mit den angegebenen Mitteln oder gibt es
dafür eine alternative Vorgehensweise?

Systemplattformen: Windows Vista, Windows XP und Windows Server 2003
Access Versionen: 2003 und 2007

Liebe Newsgroup,
ich hoffe mit dieser Frage bei Ihnen richtig zu liegen und freue mich über
jeden Hinweis.
 

Lesen sie die antworten

#1 Peter Doering
24/11/2008 - 10:23 | Warnen spam
Hallo,

Matthias Popp wrote:

ich möchte den Anwendern meiner Access-Applikation mittels VBA einen
Datei-Dialog zur Verfügung stellen, mit dem Sie einen Ordner auswàhlen
sollen.
Dazu bin ich auf das FileDialog Objekt gestoßen, mit dem das realisiert
werden kann.

Dim Pfad as String
Dim FD as FileDialog
set FD = Application.FileDialog(msoFileDialogFolderPicker)
If FD.Show Then
Pfad = FD.SelectedItems(1) & "\"


Nun wàre es für meine Anwender wichtig, dass Sie bei der Auswahl des Pfades
erkennen können, welche Dateien sich darin befinden.



Dazu muesstest du statt msoFileDialogFolderPicker als Argument
msoFileDialogOpen verwenden. Damit wird aber die Datei ausgewaehlt, nicht
der Ordner.

Gruss - Peter

Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen