2016-02-10 105 views

回答

0

有沒有在MacOS上工作的一些特點,試試這個作爲一種替代方案:

Dim saveName As Variant 

saveName = Application.GetSaveAsFileName() 

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

感謝您的快速回復。但它是一個模板文件。它顯示默認保存類型爲所有文件。但我想在保存爲對話框中顯示默認保存類型爲xlsm。這是可能的嗎? – Zara