VBA + "Datei öffnen Dialog"

[HolgerS]

Hallöle!

Ich möchte unter Excel ein Makro ausführen, welches mir den Inhalt der Festplatte in eine Tabelle schreibt.

Das Makro funzt soweit auch, es soll jetzt nur erweitert werden:

Die Auswahl des Suchpfades mache ich im Moment über eine Texteingabe.

Das möchte ich jetzt durch einen "Datei öffnen" Dialog ersetzen.

Wie geht das?

Danke!

Holger.

[Spike]

-> Extras

-> zusätzliche Steuerelemente

-> Microsoft Common Dialog Control 6.0

-> Eigenschaften editieren.

-> Dann rufe das Control auf und voilà du hast nen Dialog

Dim sFileName As String

Dim a As New CommonDialog

a.ShowOpen

Let sFileName = CommonDialog1.Filename

[HolgerS]

Thx!!

Werd's dann gleich mal ausprobieren!!

[Spike]

Achso, hab noch vergessen zu erwähnen das du das Control auch auf der Form plazieren musst

[HolgerS]

Hab's jetzt ausprobiert, kann dat Ding aber nicht auf der Form platzieren, weil VB sacht, dass das Ding nicht korrekt lizenziert Wurde... :mad:

%&§#+~ Microsoft....