接着昨天,为了用户的需求,写好了VBA代码,但问题又来了,如果用户禁用宏怎么办,就达不到想要的效果了。那么怎么才能强制启动宏文件呢?
测试了在关天,代码如下:
-
Private Sub Workbook_BeforeClose(Cancel As Boolean)
-
ThisWorkbook.IsAddin = True
-
End Sub
-
-
Private Sub Workbook_Open()
-
ThisWorkbook.IsAddin = False
-
End Sub
这里比较关键的有两个事件,一个是工作簿打开时执行事件,另一个工作簿关闭时执行事件;比较关键的属性是工作簿的IsAddIn事件,它的副作用是如果工作簿打开后进行了更改,不会提示保存工作簿。