[EXCEL-VBA] Speichern mit Pfadauswahl als xlsm

[Excelmania]

Hallo zusammen.

Ich stehe etwas auf der Schlauch. Das Speichern eines Tabellenblattes als PDF-Datei klappt. Die ganze Arbeitsmappe als xlsm jedoch nicht.

Dim varFilename As Variant

varFilename = Application.GetSaveAsFilename( _
InitialFileName:="GP-" & Worksheets("Optionen").Range("B5").Value & " - " & Worksheets("Prozessstammdaten").Range("B3").Value & " - " & Worksheets("Prozessstammdaten").Range("B5").Value & " - " & Format(Worksheets("Prozessstammdaten").Range("B19").Value, "YYYY-MM-DD") & " - " & Worksheets("Prozessstammdaten").Range("B20").Value & " - " & Worksheets("Optionen").Range("B6").Value & ".xlsm", _
FileFilter:="Excel-Arbeitsmappe mit Makros (*.xlsm), *.xlsm", _
Title:="speichern")

 

[spcqike]

ich vermute, du musst die speichern Prozedur einfach noch aufrufen

siehe dazu auch
https://www.computerbase.de/forum/t...unter-im-sharepoint-mit-pfad-vorgabe.2011436/

 ActiveWorkbook.SaveAs varFilename