ExcelでハイパーリンクのURLだけを抽出するには・・・？

質問

Excel2000を使っています。

文字列にハイパーリンクが設定してあるデータがあるのですが、この設定してあるURLだけを別のセルに抽出する方法はないでしょうか？

今は該当文字列を右クリックして、ハイパーリンクの編集からURLをコピーしている状態ですが、もっといい方法があるのではないかと思い質問しました。

ご教授よろしくお願い致します。

回答No.1

meririn · ベストアンサー

ハイパーリンク先を新規シートに書き出す方法
というＴＩＰＳとして下記のページに公開されてますが、他にもいろいろあるでしょうね。
↓そのサイトのトップページ
http://www.nurs.or.jp/~ppoy/access/index.html
↓参考ＵＲＬのページがエクセルのＴＩＰとなってました。

参考URL：

http://www.nurs.or.jp/~ppoy/access/excel/xlM017.html

お礼

できました！回答ありがとうございました。
改造すればもっと自分好みのものになりそうですね。まだ自分でマクロを作るスキルはないのですが、頑張ってみます。

回答No.2

papayuka

抽出できる関数があるか解りませんが、例えばユーザー定義関数でこんな感じとか。

Function HLinkURL(r As Range) As String
Dim hl As Hyperlink
　Application.Volatile
　For Each hl In ActiveSheet.Hyperlinks
　　If hl.Range = r Then
　　　 HLinkURL = hl.Address
　　　 Exit For
　　End If
　Next hl
End Function

お礼

関数でもできるんですね。ユーザー定義関数の使い方がまだ良く分からないので、うまく使えませんでしたが、もっと勉強してpapayukaさんのように自分で関数がかけるようになりたいと思います。
回答ありがとうございました。