Question

我很难找到以下问题的答案。我要做的是从Excel调用一个带有参数的文字宏，一个特定的文件名。 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个参数 - 第一个是宏名称，其余是您需要传递的任何参数（所有这些参数都是可选的）。

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

使用参数从Excel调用Word宏？

1 个答案: