-1

我想使用 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)
4

1 回答 1

1

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

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

您可以更简单一点,只需将其放置为Range 将是“A1-B2”或类似的东西

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

我也建议您关注此链接

来源1 , 2

更新

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

于 2013-09-17T12:33:49.670 回答