Wordでハイパーリンクを一括置換したい

質問

Wordの文章の中にある複数のハイパーリンクのアドレスに対して、固定の文字列を付け加えたいと考えています。

その時にハイパーリンクの表示文字列は変更しないこととします。

Wordの中のVBAで処理を行おうとしているのですが、WordのVBAの情報が少なくて困っています。

環境
WindowsVista Word2007

恐れ入りますが宜しくお願いします。

回答No.1

mimeu · ベストアンサー

なにをなさりたいのか、質問文では見当がつきませんが　（＾－＾）
単純に考えれば、見本のようになります。

Sub 見本()
　　Dim ハイパーリンク As Hyperlink, 文字列 As String
　　For Each ハイパーリンク In ActiveDocument.Hyperlinks
　　　　文字列 = ハイパーリンク.Address & "追加する文字列"
　　　　ハイパーリンク.Address = 文字列
　　Next
End Sub

お礼

つたない質問内容にも関わらず、正にこちらの意図した回答をいただきました。大変ありがとうございます。