Question

我想使用VBscript在word文档中添加几个超链接。

但我可以在每次覆盖前一个地方时在同一个地方添加超链接。

代码提供的代码

For TRow = 2 To Target_LastRow 
    ObjWord.ActiveDocument.Hyperlinks.Add 
    Anchor:=SAnchr, _ Address:=getExcelObj.Worksheets(2).Cells(TRow, 4).Value, _
      TextToDisplay:="Link" & (TRow - 1)

Answer 1

这是我通过您提供的代码找到的内容。我希望这是一个开始。

ObjWord.ActiveDocument.Hyperlinks.Add(Anchor:=Ank, Address:=M, SubAddress:=SA, ScreenTip:=M, TextToDisplay:=M, Target:=M)

你可以更简单一点，只需这样放置范围将是“A1-B2”或类似的东西

range.Hyperlinks.Add(range, "http://www.microsoft.com")

我还建议您关注This Link

来源1，2

<强>更新

要添加到覆盖，您必须更改您选择的值以表示插入的范围或区域。 我的狂野预感告诉我它将是anchor变量

VB脚本添加超链接

1 个答案: