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

不能为我的生活弄清楚为什么我无法将超链接添加到选定的文本。错误450：错误的参数数量或无效的属性分配Excel-Vba

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。有任何想法吗？

来源

2016-08-02 Malteaser6900

你必须oWord从Excel内这是很好的连接到Word中，但是这两个应用程序具有对象Selection并在Hyperlinks.Add代码Anchor值不与oWord这意味着它正试图使用Excel Selection这也是造成前缀错误。

更改锚线： -

Anchor:=oWord.Selection.Range, _

来源

2016-08-02 10:54:18

@SiddharthRout抓到我了一点因为有一些有用的细节上的问题缺少会帮助，当我第一次尝试在Word本身它工作得很好。 –

我刚刚访问过这个问题，然后开始输入答案，然后我看到一个提示“答案已发布”...：D –

@Gary非常棒！太感谢了。为了清楚起见，我应该每次谈论Word对象时引用我的oWord对象，然后我的其他对象应该自动引用Excel对象？ – Malteaser6900

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

回答

相关问题