Hi!
I have a macro, that should show a file save as dialog and save the file:
Code:
Sub ShowSaveAsDialog()
Dim dlgSaveAs As FileDialog
Application.FileDialog(msoFileDialogSaveAs).InitialFileName = FName
Set dlgSaveAs = Application.FileDialog( _
FileDialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
End Sub
I call this macro when the document is closed. When I call it, the dialog shows up (see
clipboard1.jpg - sorry, but it's in my native language) and I can select the folder and change the file name, but when I klick on the Save button, the dialog closes and the file isn't saved. Then "Save your changes to this file" dialog opens asking if I would like to save the file (
clipboard2.jpg).
In this second dialog the initial file name is not the same as in the first dialog, and also the location for saving not as required.
Can someone please explain why the macro isn't working?