Show “Save As” dialogbox in Mac excel 2011 using vba

Question

How to show save as dialog box with xlsm as default save as file type in mac excel 2011?

Application.FileDialog(msoFileDialogSaveAs)  

works fine in windows. But it throws error in Mac

Thanks in Advance!!!

Answer 1

There are some features that do not work on MacOS, try this as an alternative:

Dim saveName As Variant

saveName = Application.GetSaveAsFileName()

If Not saveName = False Then
    ActiveWorkbook.SaveAs CStr(saveName)
Else
    MsgBox "File not saved!"
End If