【重温经典】VB6 创建Excel Com加载项

VB6在Win10/Win11安装教程请看第二篇文章！！！

前置说明：

1.Office 建议安装32位，否则开发的过程中会出现很多意想不到的问题

2.VB6 IDE 需要完整版，精简版的不行

第一步，新建外接程序

第二步，整理新建的Com加载项项目代码

2.1.删除frmAddiIn窗体

2.2.删除Connect里面的代码

第三步，添加Excel引用及Ribbon菜单相关的引用

3.1.先删除默认的Microsoft 0ffice 8.0 object Library类库

3.2.引用Excel类库

# Office 2024 默认路劲
C:\Program Files (x86)\Microsoft Office\root\Office16\EXCEL.EXE

3.3.引用RibbonX UI相关的类库

#Office 2024 默认路径
C:\Program Files\Common Files\microsoft shared\OFFICE16\MSO.DLL

第四步，编写Connect代码

4.1.引入IDTExtensibility2和IRibbonExtensibility接口，并实现相关的方法

4.2.定义一个全局的XlApp Excel对象，注意Office2013后要Object类型，并通过IDTExtensibility2_OnConnection方法赋值

4.3.定义一个Xml文件或者xml字符串又或者res资源文件，用来定义Ribbonx菜单功能，我这里使用 xml字符串形式简单演示

4.4.添加RibbonX XML按钮的点击事件

第五步，开发调试配置

5.1.在项目根目录下，创建一个Install.reg的注册表，写入下面的内容，注意编码必须为ANSI,然后保存，双击运行，添加注册表（仅需运行一次，后续无需再次操作）

5.2.返回项目，按三角符号或者F5运行项目，项目会处在一个等待的状态

5.3.然后打开Excel表应用，这是就会在菜单栏见到刚刚创建的UI菜单

5.4.注意每次，编写代码后重新运行代码，均要关闭Excel重新打开，才能加载到最新的代码

5.5.卸载注册表，只要新建复制一份Install.reg注册表，并重命名为Remove.reg,然后在注册表前面加上-即可，然后双击即可卸载！

6.生成DLL并部署

6.1.生成DLL

6.2.注册DLL，命令行需要以管理员权限运行，如果前面卸载了注册表，需要重新运行Install.reg导入注册表

regsvr32 MyAddIn.dll

6.3.卸载DLL,命令行需要以管理员权限运行,然后运行Remove.reg卸载注册表就搞定了

regsvr32 /u MyAddIn.dll

好了，就这样.....

需要示例代码的，公众号后台回复“20251029”,即可获取！！！