Dialog speichern unter aufrufen, mit Pfadsuche
01.01.2004 22:30:22
Jens
Erst mal frohes neues Jahr.
Ich hab ein Problem. Und zwar hab ich eine Mappe mit Schaltflächen, über die ich unter anderem den Explorer mit einem bestimmten Verzeichnis öffne.
Da die Mappe von verschiedenen Personen mit verschiedenen Zugriffsberechtigungen benutzt wird, ist beim Betätigen der Schaltfläche eine Pfadsuche hinterlegt. Diese prüft über ein Hilfsblatt (help.expl) die Pfade durch, die ich dort aufgeführt habe. Des Weiteren ist in jedem Ordner den ich darüber öffne eine Start Datei (*.ini Datei) abgelegt. Diese Datei wird über die vorgegebenen Pfade gesucht. Ist sie in einem der Pfade gefunden worden, öffnet der Explorer.
Soweit, Sogut.
Jetzt möchte ich mit der gleichen Methode, also mit suchen über vorgegebene Pfade, Start Datei, den Dialog speichern unter aufrufen. Also diesen Dialog öffnen mit einem vorher festgelegten Ordner. Normal geht das ja über Application.Dialogs(xlDialogSaveAs).Show. Hinter Show könnte ich jetzt noch schreiben D:\Test\ damit der Ordner Test direkt geöffnet wird. Ich brauch aber die Suchfunktion über die Hilfspfade.
Kann mir eventuell jemand bei einer funktionstüchtigen Vervollständigung des Makros helfen. Ich schaff es zwar mit dem Öffnen des Dialoges und einer vorherigen Anzeige, dass die Datei da und dort gefunden wurde, bekomme aber das Dialogfeld immer mit dem Ordner geöffnet, aus dem ich die Mappe heraus geöffnet habe.
Ich habe zur Veranschaulichung eine Beispieldatei mit angehängt. Es müssen auf G: nur zwei Verzeichnisse angelegt und in eines der Beiden die Datei Start.ini abgelegt werden. Wechselt man die ini Datei in den Ordnern hin und her sieht man die Funktionsweise.
Danke für jede Hilfe
Gruß Jens