Hallo Forum,
ich habe 2 kleine Probleme
1) ich möchte mit GetOpenFilename eine Datei öffnen und dabei bereits einen Vorschlagswert für den Dateiname eintragen, da der sich zu 90% automatisch ermitteln lässt. Aber irgendwie finde ich hierzu keione Ansatzpunkt ... Benutze ich vielleicht die Falsche Methode ?
2) Im Zusammenhang mit dem obigen Problem möchte ich auf ein Netz-Verzeichnis wechseln. Da der Anwender das Laufwerk nicht immer gemapped, bzw. das nicht immer das gleiche Laufwerk nutzt wollte ich per UNC-Schreibweise auf das Verzeichnis wechseln - Mein Versuch mit CHDRIVE und CHDIR scheitert aber kläglich - vermutlich habe ich auch hier die falsche Methode
Aus der Ecel-Doku habe ich noch einen Hinweis auf GetDrive gefunden, das liefert mir aber auch nicht das gewünschte Ergebnis, da hier als ergebnis der Sharename geliefert wird.
drvpath = "\\sharename\Verzeichnis"
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
s = "Drive " & d.DriveLetter & ": - " & d.ShareName
MsgBox s
Es wäre schon wenn mir jemand einen Schubs in die "richtige" Richtung verpassen könnte.
Danke
Alex