Sub banMacro()
Application.AutomationSecurity = 3 '禁用宏
Workbooks.Open ThisWorkbook.Path & “\1.xlsm”
Application.AutomationSecurity = 2 '恢复选择
End Sub
Sub banMacro()
Application.AutomationSecurity = 3 '禁用宏
Workbooks.Open ThisWorkbook.Path & “\1.xlsm”
Application.AutomationSecurity = 2 '恢复选择
End Sub