用于保存工作表的VBA用户窗体按钮

我目前有一个excel文档，它由不同的用户表单管理。我想在编辑文档后向我的一个用户表单添加一个保存选项（按钮）

因此，我想知道是否有代码将打开保存或另存为…窗口

---

我想要实现的是将文件保存为普通的.xsl文件，而不是.xslm文件，保存在用户可以选择的位置（从用户表单中）。

类似这样的内容

Sub test()

Dim vSave_File As Variant

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

End Sub