Excel VBA セルや図形にハイパーリンクを設定する

スポンサーリンク
スポンサーリンク

セルや図形にハイパーリンクを設定する方法

ハイパーリンクとは、リンク先が設定されている
文字列や図形のことです。
ハイパーリンクをクリックすると
設定されているリンク先にジャンプすることができます。

ファイルやWebページ、電子メールアドレス、ブック内の別の場所への
ハイパーリンクを設定することができます。

Hyperlinks.Add【ハイパーリンクスアド】メソッド

セルや図形にハイパーリンクを設定するには
Hyperlinks【ハイパーリンクス】コレクションの
Add【アド】メソッドを使用します。

Hyperlinks.Add【ハイパーリンクスアド】メソッド

[]内は省略可能です。
オブジェクト.
Hyperlinks.Add(Anchor, Address[, SubAddress, ScreenTip, TextToDisplay])


設定値(引数)の説明

  • オブジェクト(必須)
    Sheetオブジェクトを指定します。
  • Anchor【アンカー】(必須)
    ハイパーリンクの設定先をオブジェクト型の値で指定します。
    セルに設定する場合はRangeオブジェクトを指定します。
    図形に設定する場合はShapeオブジェクトを指定します。
  • Address【アドレス】(必須)
    URLやファイルのパスなど、ハイパーリンクのアドレスを文字列で指定します。
ケース指定方法
Webページ
リンク先にする場合
「Address:=”https://kosapi.com”」
のようにWebアドレスを指定します。
メールアドレス
リンク先にする場合
「Address:=”mailto:メールアドレス”」
のようにアドレスの前にmailto:を記述します。
別ファイル
リンク先にする場合
「Address:=”C:¥user¥Document¥ファイル.xlsx”」
のようにファイル名をドライブ名から指定します
ブック内のシート
リンク先にする場合
「Address:=””」のように空文字を指定して
引数SubAddressにリンク先のシートを指定します。
  • SubAddress【サブアドレス】(省略可)
    ハイパーリンクのサブアドレスを指定します。
    指定したWebページ内のサブアドレスや指定した
    ワークシートのセルなどを指定します。
  • ScreenTip【スクリーンチップ】(省略可)
    ハイパーリンク上をマウス ポインターで指した場合に
    表示される文字列を指定します。
  • TextToDisplay【テキストトゥディスプレイ】(省略可)
    セルや図形の表示する文字列を指定します。

ブック内のシートをハイパーリンクに設定するコード例

Sub シートリンク()
Dim i As Long
For i = 2 To Sheets.Count
ActiveSheet.Hyperlinks.Add _
Anchor:=Cells(i, 2), _
Address:="", _
SubAddress:=Sheets(i).Name & "!A1", _
ScreenTip:=Worksheets(i).Name, _
TextToDisplay:=Sheets(i).Name
Next i
End Sub

実行前

実行後


サンプルコード例リンク

住所データをGoogleMapにリンクする方法


Hyperlinks.Delete【ハイパーリンクスデリート】メソッド

設定したハイパーリンクを解除するには
Hyperlinksコレクションの
Deleteメソッドを使用します。

Hyperlinks.Delete【ハイパーリンクスデリート】メソッドの書式

[]内は省略可能です。
オブジェクト.Hyperlinks([Index]).Delete


設定値(引数)の説明

  • オブジェクト(必須)
    Sheetオブジェクトを指定します。
  • Index(必須)
    解除するハイパーリンクをインデックス番号で指定します。
    インデックス番号は作成した順番です。

    省略した場合はシート上のすべてのハイパーリンクが解除されます。

※ハイパーリンクは解除されますが設定された文字列はそのまま残ります。

シート上のすべてのハイパーリンクを解除するコード例

Sub リンク削除()
ActiveSheet.Hyperlinks.Delete
End Sub

以上で
セルや図形にハイパーリンクを設定する方法についての解説を終了します。
ありがとうございました。

スポンサーリンク
スポンサーリンク

フォローする

スポンサーリンク
スポンサーリンク