错误 450：错误数量的参数或无效的属性分配 Excel-Vba

【问题标题】：Error 450: Wrong number of arguments or invalid property assignment Excel-Vba错误 450：错误数量的参数或无效的属性分配 Excel-Vba
【发布时间】：2016-08-02 10:28:04
【问题描述】：

我一生都无法弄清楚为什么我不能为所选文本添加超链接。

oWord.ActiveDocument.Select
With oWord.Selection.Find
    .Text = "Text to Find"
    .Wrap = wdFindStop
    .Execute
End With

oWord.ActiveDocument.Hyperlinks.Add _ 
Anchor:=Selection.Range, _ 
Address:=fpath & ProductName & "_" & ExpTitle & "_" & Revision & ".docx", _
TextToDisplay:="Text to Find"

上面的代码选择了“要查找的文本”，但在尝试添加超链接时给了我一个错误 450。有什么想法吗？

【问题讨论】：

标签： vba excel macros ms-word

【解决方案1】：

您有 oWord 从 Excel 中连接到 Word，这很好，但是两个应用程序都有对象 Selection 并且在您的 Hyperlinks.Add 代码中，Anchor 值没有以 oWord 为前缀，这意味着它是尝试使用导致错误的 Excel Selection。

将锚线更改为：-

Anchor:=oWord.Selection.Range, _

【讨论】：

@SiddharthRout 引起了我的注意，因为问题中缺少一些有用的细节，这会有所帮助，当我第一次在 Word 中尝试它时，它运行良好。
我刚刚访问了该问题并开始输入答案，然后我看到提示“已发布答案”...：D
@Gary 太棒了！太感谢了。为了清楚起见，我应该在每次谈论 Word 对象时引用我的 oWord 对象，然后我的其他对象应该自动引用 Excel 对象？