Hallo,
Mit folgendem Auszug eines Makros versuche ich das Laufwerk zu wechseln. Leider klappt es nicht wie ich es will! Das SaveAs Dialog wird geöffnet aber der Unterordner "Ordner A-West" wird nicht ausgewählt
Dim Path2 As String
Path2 = ThisWorkbook.Path & "\Ordner A-West\"
ChDrive Path2
Application.Dialogs(xlDialogSaveAs).Show Format("Besuchsprotokoll - ") & Range("F19") & Format(" - ") & Format(Date, "dd mmm yy") & ".xls"
Hat jemand eine Idee?
Gruß
Martin