将参数传递给excel宏中的word宏

Question

我通过excel宏向word应用程序发出变量：

dim wrdApp as Word.Application
dim wrdDoc as Word.Document
dim PRODUCT_NAME as string
PRODUCT_NAME="This thing"
Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Add
wrdApp.Run "MAIN_TOC", PRODUCT_NAME

这会产生运行时错误＆＃39; 450＆＃39;：
参数数量错误或属性分配无效。

我做错了什么？

Answer 1

作为背景，我在Excel中处理多个表并通过剪贴板将表传递给Word。 我需要一路让Word知道我经过的桌子。使用'WrdApp.Run“MAIN_TOC”，PRODUCT_NAME'，我想， 将允许Word使用正确的名称处理每个剪贴板。 实际上发生的事情是，PRODUCT_NAME已被通过，但剪贴板的内容已被删除。

我最终的解决方案是将表的名称放在表中。 单词macro将获取剪贴板，然后查看表的第一个单元格以获取表名称。 完成后，Excel然后传递下一个表并重复该过程。

现在一切正常。