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

ハイパーリンクを設定する

構文

ActiveSheet.Hyperlinks.Add(Anchor, Address, SubAddress, ScreenTip, TextToDisplay)

Sub test()

’ A1にハイパーリンクを設定
ActiveSheet.Hyperlinks.Add Anchor:=Range("A1"), _

Address:="https://ameblo.jp/yokbali168"

End Sub

Sub test()

   ’ A3にハイパーリンクを設定(ヒント、アンカーテキストも設定)
    ActiveSheet.Hyperlinks.Add Anchor:=Range("A3"), _
            Address:="https://ameblo.jp/yokbali168", _
            ScreenTip:="EXCEL・VBA学習記録", _
            TextToDisplay:="プログラミング学習メモ"

End Sub

ハイパーリンクを削除する

特定セルのハイパーリンクを削除

Sub test()

’ A1のハイパーリンクを削除
Range("A1").Hyperlinks.Delete

End Sub

シートのハイパーリンクを全て削除

Sub test()

’ アクティブシートのハイパーリンクを全て削除
ActiveSheet.Hyperlinks.Delete

End Sub

VBA セル罫線操作（罫線太さや色）

VBA セル罫線操作（罫線種類）