VBA用戶表單按鈕來保存工作表

Question

我目前有一個由不同用戶表單管理的excel文檔。在編輯文檔後，我想添加一個保存選項（按鈕）給我的一個用戶表單。

因此我想知道是否有代碼會打開保存或另存爲...窗口？

我想實現的是將文件保存爲一個普通的.xsl文件，而不是.xslm文件保存在用戶可以選擇的位置（來自用戶窗體）。

Answer 1

這樣的事情......？

Sub test() 

Dim vSave_File As Variant 

vSave_File = Application.GetSaveAsFilename("Test.xls", "Excel files (*.xls),*.xls", 1, "Dialog Title") 

End Sub