无法执行剪切和粘贴VBA脚本

Question

我一直在疯狂地试图弄清楚为什么我的脚本不起作用，直到我开始直接从几个网站复制和粘贴示例源代码，只是让它在那里失败。我的VBScripts中出现以下错误：

  

C：\ temp \ vbs \ script.vbs（19,53）Microsoft VBScript编译错误：预期声明'

对于一行代码如下：

    wdoc.Application.Selection.Find.Execute Replace:=wdReplaceAll

这与Office 2007中的Microsft Word连接以进行搜索和替换。索引53直接指向赋值的：= 部分。由于这种语法在我的机器上不起作用，我在几个网站上使用它，我想知道我使用的cscript.exe是否过时。

我没有正确地调用cscript吗？

Answer 1

命名参数（Param:=Value）是Visual Basic和VBA功能; VBScript不支持此语法。

在VBScript中，您需要保留例程参数的实际顺序。如果特定参数是可选的并且您想要使用其默认值，则只需省略该参数即可。所以，你的代码应该是这样的：

Const wdReplaceAll = 2
wdoc.Application.Selection.Find.Execute , , , , , , , , , , wdReplaceAll