Fehlerhafter Code "speichern unter"
27.01.2017 17:45:49
Hage
ich möchte per vba eine Datei speichern. Und zwar soll das "speichern unter"-Fenster geöffnet werden und ein vorgegebener Dateiname erscheinen. Leider funktionert das bei mir nicht so.
Ich habe folgenden code:
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & Filename, FileFormat:=xlText, CreateBackup:=False, Local:=True
Application.Dialogs(xlDialogSaveAs).Show Filename
Eigentlich dachte ich, dass der untere Teil reichen müsste, aber dann erscheint nur der Dialog ohne Dateiname.
Wenn ich den gesamten Code aber so ausführe, dann erscheint zwar der Dialog mit Dateiname, aber die Datei wurde dann schon automatisch gespeichert.
Also meine Frage: Was muss ich ändern/löschen damit dies nicht mehr vorkommt?
Danke und Grüße