Excelのハイパーリンクについて

質問

昨日、
エクセル２０００に
ＵＲＬを一行に一個という形で
２００個ほどコピペしました。

こちらにはハイパーリンクはついていません。

この２００個にハイパーリンクをつける効率の良い
方法はありませんか？

(1)ハイパーリンクの編集
　　　　↓
(2)ＵＲＬをコピー
　　　　↓
　　(3)貼り付け

で一つずつハイパーリンクをつけていかなければならないですか？

(1)、(2)、(3)をマクロにしてみた所
コピーしたＵＲＬを貼り付けてしまうため、
だめでした。

簡単なやり方のほうが助かりますが
マクロ等をいじる方法でも問題ありません。

教えていただけると非常に助かります。
よろしくお願いいたします！！！

回答No.1

neKo_deux · ベストアンサー

隣のセルなどに、

=HYPERLINK(URLのセル, "■")

とかで、リンクへジャンプする■マークが作れます。
リンクの文字列が邪魔になら無い分、自分はこちらの方が好みですが。

お礼

とてもやりやすかったです！

こういうの期待していました。
すごい助かりましたありがとうございました！

回答No.2

xls88

マクロを試してみました。
下記のようなことで設定できました。
URLのセル範囲をループしてやれば良いとおもいます。

Sub testハイパーリンク()
　　With Worksheets("Sheet1")
　　　　.Hyperlinks.Add Anchor:=.Range("A1"), Address:=.Range("A1").Value
　　End With
End Sub

お礼

是非今から試させていただきます。

悩み自体は解決したのですが、
丁寧に教えていただき本当にありがとうございました！