Save as ohne jeglicher Nachfrage
20.01.2017 14:58:47
Hermann
ich brauche mal eure Hilfe.
Wie kann ich das Fenster für save as unterdrücken.
Ich kann aber nicht einfache save machen, da ich den Dateinamen erst generiere.
Application.DisplayAlerts = False reicht um Meldung wie Speichern als Makrofrei, usw. zu unterdrücken. Ich möchte aber einfach ohne jeglicher Nachfrage mit generiertem Namen speichern.
Application.DisplayAlerts = False
fileSaveName = Application.GetSaveAsFilename(InitialFileName:=(ThisWorkbook.Path & "\" & FullName), FileFilter:="Excel Workbook (*.xlsx), *.xlsx")
ActiveWorkbook.SaveAs Filename:=fileSaveName, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Application.DisplayAlerts = True
Viele Dank im Voraus
Hermann