エクセル：ハイパーリンクの一覧を作る

エクセルでハイパーリンクのコピー -エクセルで他のsheetへハイパーリ- Excel（エクセル） | 教えて!goo https://oshiete.goo.ne.jp/qa/6748515.html

public function getAddress(ByVal Target As Range) 　if target.cells(1).hyperlinks.count > 0 Then 　getaddress = target.cells(1).yyperlinks(1).subaddress 　end if end function

ファイルメニューから終了してエクセルに戻り，隣のＢ１セルに =getaddress(A1) と数式を記入すると，ハイパーリンクではなくハイパーリンクのアドレスを取り出します。