エクセルでハイパーリンクのリンク先を取得する方法

標準モジュールを作成します.

その中に以下のコードを書き込みます．

Function LNK(rng As Range)
LNK = rng.Hyperlinks(1).Address
End Function

シート内でリンク先を取得したいセルを
=LNK(リンク先を取得したいセル)

のように式して取得できます．