封装Excel VBA代码：Excel VBA代码引用DLL
通过将Excel VBA代码封装成DLL，可有效防止代码被非法查看。在上一节中，我们创建了一个用VBA编写的DLL，并成功生成了"feifeidown.dll"文件。本节，我们将学习如何在Excel VBA环境中引用该DLL，以及编写代码调用它。
1. 引用Dll文件
首先，打开Excel 2007并按下键盘组合键"Alt F11"进入VBA编程环境。然后点击"工具"→"引用"选项，在打开的"引用"窗口中，点击"浏览"按钮。
2. 添加引用
在弹出的"浏览文件"窗口中，找到上一节生成的"feifeidown.dll"文件，点击"确定"进行添加。返回"引用"窗口后，确保勾选"feifeidown"选项，然后点击"确定"按钮完成引用的添加。
3. 注册和反注册DLL
双击"ThisWorkBook"对象，在其中选择"Open"事件和"BeforeClose"事件，并输入以下代码：
```
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Shell "Regsvr32 /u/s " (34) "feifeidown.dll" (34), vbHide
End Sub
Private Sub Workbook_Open()
Shell "Regsvr32 /s " (34) "feifeidown.dll" (34), vbHide
End Sub
```
以上代码用于在文档打开时注册DLL，并在关闭时反注册DLL。
4. 编写调用DLL的代码
右击"Excel对象"，选择"插入"→"模块"，在模块中输入以下代码：
```
Sub Test()
Dim sa As New AddInfo
End Sub
```
这段代码用于调用DLL中的函数，实现相应的功能。在Sheet1工作表中运行宏后，可以看到效果。
5. 自动运行宏
最后，将该过程添加到"ThisWorkBook"的启动菜单中，即可实现在打开文档时自动运行宏的目的。
通过封装Excel VBA代码成DLL，并在Excel VBA环境中引用和调用该DLL，我们可以更好地保护代码的安全性，并实现更复杂的功能。希望本文对你有所帮助！
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
