使用参数从Excel调用Word宏？

Question

我很难找到以下问题的答案。 我想做的是从Excel调用带参数的Word宏，具体来说是文件名。 Excel创建一个.txt文件，然后我需要用词来处理它。 问题是我如何得到单词来接收文件名？

我有一些代码开头，在单词宏中使用硬编码的文件名时，我可以使用它，但是我需要将文件名作为变量传递。

到目前为止的代码：

    Public Function convertTxt(txtFile As String)

      Dim WD As Object
        Set WD = CreateObject("Word.Application")

        WD.Documents.Open ThisWorkbook.Path & "\Word\" & "far.docm"

        ' Note that the project name and module name are required to
        ' path the macro correctly.
        WD.Run "runTxtConversion(txtFile)"

End Function

有什么建议么？

这是我第一次发布问题，因此也欢迎提出任何有关我如何提问的建议。

Answer 1

尝试使用：

WD.Run "runTxtConversion", txtFile

Run方法具有31个参数-第一个是宏名称，其余的是您需要传递的任何参数（所有这30个都是可选的）。

您的代码正在传递文字文本“ runTxtConversion（txtFile）”作为宏的名称。