---

Hallo zusammen!

Ich suche eine Möglichkeit, via VBA eine Pfadangabe durch den User abzufragen. Kann man das mit wenig Aufwand durch einen Windows-Standartdialog realisieren? Der "Speichern unter"-Dialog vom Common-Dialog-Steuerelement scheint mir dafür ungeeignet, da ja nur ein Pfad und keine Dateiname gewählt werden soll.
Und die reine Textabfrage via TextBox ist ziemlich unkomfortabel sowie fehleranfällig.

Grüße!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

eine Möglichkeit mittels shell.application

aufruf
ret = BrowseForFolder("Ordner wählen")

funktion
Public Function BrowseForFolder(ByVal sTitle As String) As String
  Dim oShell As Object
  Dim oFolder As Object

  Set oShell = CreateObject("Shell.Application")
  Set oFolder = oShell.BrowseForFolder(Me.HWND, sTitle, 1)
  If Not oFolder Is Nothing Then
    BrowseForFolder = oFolder.Self.Path
  End If
  Set oFolder = Nothing
  Set oShell = Nothing
End Function

------------------
WWW.FFZELL.AT.TC

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Fuchsi!

Vielen Dank für deine schnelle Antwort, das scheint schon eine interessante Lösung zu sein.
Leider gibt es noch ein kleines Problem: Worauf bezieht sich denn me.HWND? An dieser Stelle kommt: "Methode oder Datenobjekt nicht gefunden".
Grüße!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

schreib statt me.hwnd einfach 0 (null)

me.hwnd wäre der Windows Fensterhandle , wenn du das aus einem Formular startest. Abwer das gibts bei VBA eh nicht, sondern nur bei VB

mit der null funktioniert es

------------------
WWW.FFZELL.AT.TC

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Okay, dann probier ich das mal so! Wird aber erst Montag, wenn ich wieder in der Firma bin, jetzt ist erst mal !
Deine U's hast du dir aber schon verdient!
Ahoi!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

@Fuchsi

Super Sache, läuft einwandfrei! Das ist genau dass, was ich gesucht hab!
Vielen Dank!
...bist halt ein echter Fuchs! 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Fuchsi!

Ich habe dein Programm zur Pfadauswahl übernommen. Toll! 
Frage: Kann man auch einen Vorgabepfad angeben?

------------------
Nodda,

Stefan 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP