如何获取 Word VBA 引用的完整路径答案

【问题标题】：How to get full path for Word VBA references如何获取 Word VBA 引用的完整路径
【发布时间】：2019-07-27 05:13:37
【问题描述】：

我正在尝试将整个 Word VBA 项目迁移到备用笔记本电脑。几年前，我很难找到一些用于我的项目当前使用的各种对象的活动 X dll。经过大量研究后，它们都已安装并正常工作。

在浏览当前检查的引用（工具--引用）时，我看到一些检查的引用（我需要和使用）仅显示路径的顶部。我知道我的备份笔记本电脑（Win7、Office 2003）上的任何地方都不存在许多这些检查的引用如果我能看到完整路径，我可以找到它，复制它并将其安装在备用笔记本电脑上。

有没有办法得到完整的路径？？

我真的不想在我原来的笔记本电脑上做我最初做的事情，运行项目，注意一个 dll 丢失的投诉，尝试找出这个 dll 属于哪个引用，ad nauseum。

Google for Word 没有任何帮助，Access 和 Excel 的大量信息不适用于 Word。

也许这些引用存储在注册表中？？

谢谢注意，这个项目非常广泛，3000多行代码，与AutoIt、SQLite、Home Inspection软件集成。为我节省了大量工作。

【问题讨论】：

tek-tips.com/viewthread.cfm?qid=1563159
请注意，您找到的有关如何注册 dll 的信息是否适用于 Word、Excel、Access 或 PowerPoint 并不重要——在这方面它们都是相同的。蒂姆链接到的贡献有您正在寻找的代码...@TimWilliams 如果这里没有重复，那么将这个信息放在答案中会很有意义。

标签： vba ms-word reference

【解决方案1】：

发件人：https://www.tek-tips.com/viewthread.cfm?qid=1563159

参考“Microsoft Visual Basic for Applications Extensibility 5.3”后，您可以：

Function ListAllRefs()
Dim my_ref As VBIDE.Reference
     For Each my_ref In ThisWorkbook.VBProject.References
         With my_ref
            Debug.Print .Name, .Description, .FullPath, .IsBroken
            Debug.Print
        End With
     Next
End Function

【讨论】：