【Excel】他のセルや他のブックへのリンクを設定するマクロ

2017年7月1日

2017年7月1日 (土) 22:07 in Excel , VBA

他のセルや他のブックへのリンクを設定するには、HyperLinks.Addメソッドの第３引数にセルを指定します。

たとえば、セルB3に同じシートのセルD3へのリンクを設定するには次のように記述します。

Sub SetHyperLink()

    Hyperlinks.Add Range("B3"), "", "D3"

End Sub

実行結果

また、別シートへのリンクを設定するには、次のように記述します。

Sub SetHyperLink()

    Hyperlinks.Add Range("B3"), "", "Sheet8!B2"

End Sub

実行結果

また、別ブックのセルのリンクを設定するには、第２引数にブックを指定します。

Sub SetHyperLink()

    Hyperlinks.Add Range("B3"), "C:\work\Excel\test01.xlsx", "Sheet1!B2"

End Sub

実行結果

また、ツールチップとリンクの表示テキストも設定できます。
第３引数と第４引数にそれぞれ設定します。

Sub SetHyperLink()

    Hyperlinks.Add Range("B3"), "C:\work\Excel\test01.xlsx", "Sheet1!B2", "クリックすると別のブックへ飛びます。", "別ブックへのリンク"

End Sub

実行結果

2017年7月1日