DefaultFilePath
serge
Ich speichere meine Datei mit folgendem Code:
Sub speicherndialog()
Application.Dialogs(xlDialogSaveAs).Show "C:\Dokumente und Einstellungen\serge\Eigene Dateien\" _
& Range("sauver"), 1
End Sub
Nun möchte ich an Stelle von "C:\Dokumente und Einstellungen\serge\Eigene Dateien\" den Speicherfolder der Arbeitsdatei einsetzen ( DefaultFilePath!!!).
Wie sollte dann der Code aussehen?
Danke
Serge
Anzeige