强制启动宏

????接着昨天，为了用户的需求，写好了VBA代码，但问题又来了，如果用户禁用宏怎么办，就达不到想要的效果了。那么怎么才能强制启动宏文件呢？

????测试了在关天，代码如下：

1. Private Sub Workbook_BeforeClose(Cancel As Boolean)
2. ThisWorkbook.IsAddin = True
3. End Sub
4. ?
5. Private Sub Workbook_Open()
6. ThisWorkbook.IsAddin = False
7. End Sub

????这里比较关键的有两个事件，一个是工作簿打开时执行事件，另一个工作簿关闭时执行事件；比较关键的属性是工作簿的IsAddIn事件，它的副作用是如果工作簿打开后进行了更改，不会提示保存工作簿。

强制启动宏

原文：http://www.cnblogs.com/liweis/p/4262343.html