セルについて (ID:117853)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 セルというのがエクセルのセルだったらこんな感じです。 Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Select Case Target.Address Case "$A$1" Range("B1").Hyperlinks(1).Follow Case "$A$8" Range("B8").Hyperlinks(1).Follow End Select End Sub