1、引用Dll文件打开Excel 2007,按键盘组合键“Alt+F11”进入VBA编程环境。点击“工具”→“引用”选项,在打开的“引用”窗口中,点击“浏览”按钮。
![封装ExcelVBA代码:[2]ExcelVBA代码引用DLL](https://exp-picture.cdn.bcebos.com/031231632385e0364cb94b5db8e039723c035abd.jpg)
2、在随后打开的“浏览文件”窗口中,找到上一节生成的“feifeidown.dll”文件,点击“确定”进行添加,在返回的“引用”窗口中,确保勾选“feifeidown”,然后点击“确定”按钮完成。
![封装ExcelVBA代码:[2]ExcelVBA代码引用DLL](https://exp-picture.cdn.bcebos.com/57af657f860e7c752edcf040650d3aceabd7bfbd.jpg)
3、双击“ThisWorkBook”,选择“Open”事件和“BeforeClose事件上”,敛财醣沁并输入以下代码,用于在文档打开时注册DLL,以及关闭时反注册DLL。Private Sub Workbook_BeforeClose(Cancel As Boolean) Shell "Regsvr32 /u /s " & VBA.Chr(34) & ThisWorkbook.Path & "\feifeidown.dll" & VBA.Char(34), vbHideEnd SubPrivate Sub Workbook_Open() Shell "Regsvr32 /s " & VBA.Chr(34) & ThisWorkbook.Path & "\feifeidown.dll" & VBA.Char(34), vbHideEnd Sub
![封装ExcelVBA代码:[2]ExcelVBA代码引用DLL](https://exp-picture.cdn.bcebos.com/f367139a310e17990e02b60dc9406afec214a3bd.jpg)
5、按下键盘快捷键“F5”,在打开的“宏”窗口中选择“Test”,点击“运行”,然后就可以在Sheet1工作表中看到效果啦。
![封装ExcelVBA代码:[2]ExcelVBA代码引用DLL](https://exp-picture.cdn.bcebos.com/8974c38a59de45078d2834c55e413a8ca70885bd.jpg)
6、最后将该过程添加到“ThisWorkBook”的启动菜单中,即可实现在打开文档中自动运行宏的目地。
![封装ExcelVBA代码:[2]ExcelVBA代码引用DLL](https://exp-picture.cdn.bcebos.com/aebdff86242fa872b536b251bfdaf05e4b23e9bd.jpg)