从 Word VBA 返回值到调用 Excel VBA答案

【问题标题】：Return value from Word VBA to calling Excel VBA从 Word VBA 返回值到调用 Excel VBA
【发布时间】：2020-03-28 08:04:09
【问题描述】：

在 MS Excel 中，我有在 MS Word 中运行 VBA 代码的 VBA 代码。一切正常。我需要将 Word 中的字符串值返回到 Excel 变量中。这可能吗？

一些不相关的背景...我正在 Excel 中构建一个 pdf 文件列表，需要从每个 pdf 文件中提取值。 Word本机读取pdf，这就是我使用它的原因。我有一个完美运行的 python 脚本，但组织中没有其他人知道 python，我的经理不喜欢只有我理解的代码。这很公平！

任何提示将不胜感激！

【问题讨论】：

请edit您的代码问题。
您可以使用剪贴板。在 Word 宏中复制，然后从剪贴板粘贴到 Excel 中
剪贴板！当然！嗬！谢谢一百万！

标签： excel vba ms-word

【解决方案1】：

Excel：

Sub RunWord()

    Dim appWd As Object, res

    Set appWd = GetObject(, "Word.Application")

    res = appWd.Run("Tester")

    Debug.Print res

End Sub

单词：

Public Function Tester()
    Tester = "hi!"
End Function

【讨论】：