Pfad als Standard setzen
markus
das folgende Makro sollte eigentlich den Standardpfad in Excel ändern.
Excel macht aber nicht das was ich wünsche.
Danke für Hilfe
Markus
Option Explicit
Sub Pfad_der_offenen_ExcelDatei_speichern()
' sollte den Pfad der offenen Exel-Datei als Standard abspeichern
Dim Pfad1 As String
Pfad1 = ThisWorkbook.Path
MsgBox Pfad1
Application.DefaultFilePath = Pfad1
End Sub
Anzeige