xlDialogSaveAs Anzeige ändern
07.12.2008 15:04:00
Herbert
Ich habe eine Datei, die in einem Intranet geöffnet werden soll und der Nutzer soll diese zuerst in seinem Verzeichnis speichern. Wenn die Datei geöffnet wird, läuft u.a. Makro:
Private Sub Workbook_Open()
If Range("D4") = "" Then
MsgBox "Bitte Datei in Ihrem Laufwerk speichern", , "Vor dem Ausfüllen"
Application.Dialogs(xlDialogSaveAs).Show
End If
End Sub
Gibt es eine Möglichkeit, xlDialogSaveAs einen Parameter mit zu geben, daß die vorhandenen Laufwerke "geschlossen" angezeigt werden, vergleichbar dem Öffnen der Explorers mit Tastenkombi Windowstaste + E ?, denn sonst verzweigt xlDialogSaveAs in das Temp-Verz des Nutzers.
Gruß Herbert