Nach Datei suchen und abspeichern unter...

[spirit]

Oh, Sorry

Es heisst nicht : OFile = List1.ListItem(1)
sondern : OFile = List1.List(0)

Damit habe ich es ausprobiert und es funktioniert. Dieses Beispiel funktioniert aber nur wenn nur ein Eintrag in der Listbox steht. Wenn ich dich richtig verstanden habe reicht es ja für dich aus.

 

[Filone]

Ich sehs erst ein bißchen spät :

Nutze APIs SHBrowseForFolder zur Dateisuche und zum Speichern von Dateien (Standard-Dateibrowser von Windows) oder SearchTreeForFile zum Suchen Deines Persönlichen Ordners.

SearchTreeForFile macht nur dann Sinn, wenn Du nicht mehrere persönliche Ordner hast und den Pfad weißt (also bspw. C:\).

 

[aniram]

Das mit dem Pfad ist so ne Sache. Ich weiß eben nicht genau, auf welchem Laufwerk sich die Datei befindet. Deswegen muss ich mehrere Laufwerke durchsuchen.

 

[spirit]

Du brauchst auch nicht wissen auf welchem Laufwerk sich die Datei befindet. Dieser Code durchsucht den ganzen Arbeitsplatz. Probiere mal aus, es funktioniert!

 

[gabrielgsell]

Verweise nochmals auf diesen Tipp. Da hast du einen Lösungsvorschlag.

Grüsse