Sub MyMacro()Application.AutomationSecurity = 3 '禁用宏Workbooks.Open ThisWorkbook.Path & “\1.xlsm”Application.AutomationSecurity = 2 '恢复选择End Sub 使用WPS的 时 候碰到了 宏 被 禁用 的问题； 有一个按钮点击之后可以检查表格中是否有填写错误，但是点击之后显示了” 宏 被 禁用 “。 然后就开始查资料，后来发现，按照方法来好像并没有啥用，这 时 候才意识到我用的是WPS，不是Office，而网上的很多都是关于Office的。Office和WPS的“ 宏 被 禁用 “的操作还是有一定区别的，于是稍稍做点（对百度百科内容的）小小整理。 一、Office 第一种方法： （左上角）“Office图标”——“选项”——“信任中心”——“信任设置中心”——看到四个选项，可 Sub OpenFileDialog() Dim wb As Workbook Set wb = Application.Workbooks.Open(Application.GetOpenFilename()) End Sub 这段代码将 打开 一个文件对话框，让用户选择要 打开 的文件，然后将选择的文件赋值给变量wb。