将Word VBA中的值返回到调用Excel VBA

Question

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

一些无关的背景。。。我正在Excel中建立一个pdf文件列表，需要从每个pdf文件中提取值。Word本机读取pdf，这就是我使用它的原因。我有一个运行良好的python脚本可以做到这一点，但组织中没有其他人知道python，我的经理对只有我才能理解的代码感到不舒服。这很公平！

任何提示都将不胜感激！

Answer 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