封装ExcelVBA代码：[1]动态链接库的生成

为了满足代码安全与保密的需求，我们有时会对Excel VBA代码进行加密。常规方式是通过设置工程密码来实现，但这种加密方法安全性较低、容易被破解，难以达到预期效果。今天，小编将为大家介绍一种更安全的VBA代码加密方式——利用动态链接库技术。这种方式能够显著提升代码的保护水平，值得尝试。

1、 启动VB 6.0，依次点击文件→新建工程。在新建工程窗口里，选择ActiveX（DLL）控件，随后点击确定按钮完成操作。

2、 引用Excel对象库

3、 单击工程→引用，打开引用窗口后，找到并选中Microsoft Excel 12.0 Object Library。注意，不同版本的Excel，对象库名称可能会有所不同，具体以实际显示为准。

4、 把工程名称改成feifeidown，把类模块名称改为AddInfo。

5、 双击类模块AddInfo，编写所示的代码：

6、 新建一个Excel应用程序对象实例

7、 创建一个新的工作簿对象

8、 创建一个工作表对象

9、 新建工作簿文件

10、 将指定工作表设为活动表

11、 为指定单元格设置值

12、 将Excel工作表的单元格(1, 1)设置为网络ID。

13、 显示工作表内容

14、 对工程内容进行详细设定和描述。

15、 单击工程→feifeidown属性，打开工程属性窗口，切换至生成选项卡。把应用程序标题设为封装VBA代码，产品名称改为通过DLL对EXCEL VBA进行封装，最后点击确定。

16、 生成打包后的DLL文件

17、 点击文件→生成feifeidownDll文件，弹出生成工程窗口后，选择保存路径，再点击确定按钮，即可完成DLL文件的生成操作。