vba - 使用 VBA 代码（宏）连接引用（工具>引用）

Question

我想使用 VBA 代码以编程方式将一些引用连接到我的 VBA 项目，即无需使用工具>引用手动设置引用。这可能吗？例如 Microsoft office 12.0 对象库。

Answer 1

您没有提到 Office 应用程序。在 MS Access 中，您可以使用：

ReferenceFromFile "C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLL"

也就是说，为您要添加的引用提供完整路径。

来自：http ://wiki.lessthandot.com/index.php/Add,_Remove,_Check_References

同样，在 Excel 中：

ActiveWorkbook.VBProject.References.AddFromFile "C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLL"

要在 Excel 中列出引用：Dim ref As Reference

For Each ref In ActiveWorkbook.VBProject.References
    Debug.Print ref.Description; " -- "; ref.FullPath
Next

这将在我的机器上的一个特定工作簿上返回以下内容：

Visual Basic For Applications -- C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLL
Microsoft Excel 14.0 Object Library -- C:\Program Files\Microsoft Office\Office14\EXCEL.EXE
OLE Automation -- C:\Windows\system32\stdole2.tlb
Microsoft Forms 2.0 Object Library -- C:\Windows\system32\FM20.DLL
Microsoft ActiveX Data Objects 6.0 Library -- C:\Program Files\Common Files\System\ado\msado15.dll
Microsoft XML, v6.0 -- C:\Windows\System32\msxml6.dll
Microsoft Office 14.0 Access database engine Object Library -- C:\Program Files\Common Files\Microsoft Shared\OFFICE14\ACEDAO.DLL
Microsoft Visual Basic for Applications Extensibility 5.3 -- C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB
Microsoft Office 14.0 Object Library -- C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLL

Answer 2

引用完整路径充满危险，并且当代码在不同计算机或不同版本中使用时会给您带来问题。

最好使用在大多数（但不是所有情况下）对于不同版本的应用程序保持相同的 GUID。

这很有帮助，特别是如果您为 Excel 2010 编写了需要在 Excel 2010 和 Excel 2013 中使用的代码。

Answer 3

在另一个位置可以找到 MSO.dll 文件：

C:\Program Files (x86)\Common Files\microsoft shared\oFFICE11

只需将 Tool > References >Browse 设置到上述路径并找到 MSO.dll