Hallo Forum,
habe folgenden Code, der mir den Dialog "Speicher unter" öffnet und den
Dateinamen vorgibt.
Wie kann ich das Makro erweitern damit auch das richtige Verzeichnis
(G:\BDE\MSCONS)gewählt wird ?

ZuSpeicherndeDatei = Application.GetSaveAsFilename _
(InitialFilename:="Import" & ".msc", FileFilter:="MSCONS - Dateien (*.msc), *.msc")

ActiveWorkbook.SaveAs Filename:=ZuSpeicherndeDatei, FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

Vielen Dank für die Hilfe !!

mfg
Holger