Guten Morgen,
gestern hatte schon Rudi und UweD geholfen, erfolgreich !
Jetzt würde ich gern zur Speicherungs-Auswahl als 1. Das der derzeitige Speicherort per Explorer angezeigt wird.
Dann sollte man entweder diesen Speicherort übernehmen oder einen anderen Speicherort auswählen können.
Dies von UweD:
Dim iJahr As Integer
iJahr = InputBox("ist das das richtige Jahr?", "Jahr", Year(Date))
ActiveWorkbook.SaveAs Filename:= _
"C:\__Walter_Sonstige\##_Betriebskosten Jahr " & iJahr, _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
sollte weiter mit drin sein.
Geht sowas ?
gruß walter