-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)

もっと簡単に、範囲が「A1-B2」または同様のものになるように配置することができます

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

また、このリンクに従うことをお勧めします

ソース12

アップデート

上書きに追加するには、挿入の範囲または領域を表すために選択した値を変更する必要があります。私の野生の予感は、それが変数になることを教えてくれますanchor

于 2013-09-17T12:33:49.670 に答える