使用VBA安装Excel COM加载项

Question

是否可以使用VBA安装COM加载项？我发现另一个帖子链接到使用VBA安装非COM加载项的解决方案，但这不适用于COM加载项。这并不重要，但我特别想要为Excel 2013安装Inquire COM加载项。

以下是我所知道的不起作用：

这是我发现的用于安装非COM加载项的代码：

AddIns("NativeShim.InquireConnector.1").Installed = True

该代码失败，因为我正在尝试使用COM加载项，并且该集合中不存在指定的加载项。

这是我尝试使用COM加载项的代码

Dim addin As COMAddIn
Set addin = COMAddIns.Item("NativeShim.InquireConnector.1")
addin.Installed = True

该代码正确获取对加载项的引用，但在将Installed设置为True时失败，因为COMAddIn对象没有Installed属性。

Answer 1

基于Excel 2010，您需要：

1. 以管理员权限运行Excel

2. 连接到您的加载项，而不是以这种方式设置.Installed property：

   Application.COMAddIns("NativeShim.InquireConnector.1").Connect = True
   

3. 将.Connect property设置为false显然会关闭com add-in。