Re: コピー&ペーストしたメールアドレスを一括してリンク設定できないですか?
Naoaki Satoさんの<bj607r$2ju$1@fujigw.fujielectric.co.jp>
>入力済みのものに対しては、F2を押してenterで自動設定されますね
石川と申します。
F2が思い出せませんでした。それがわかればマクロでもでき
ますね。
標準モジュールにコードを書き込んで、エクセルに戻って
ツール−マクロ−マクロ で実行すると動くと思います。
尚、ビジュアルベーシックエディターから実行してしまうと違
う動作をしてしまうので範囲が広いとフリーズしてしまいます。
Sub Test()
Dim Han_i As Range, Seru As Range
Set Han_i = Selection
For Each Seru In Han_i
Seru.Select
SendKeys "{F2}"
SendKeys "{ENTER}"
Next Seru
Han_i.Select
End Sub
余談ですが、ハイパーリンクを一括削除するには範囲選択して
おいてビジュアルベーシックエディターのイミディエイトウイ
ンドウに下のコードを書き込みコードの末尾にカーソルを置い
た状態でEnterです。
selection.hyperlinks.delete
--
IshikawaShinzi mailto:haribote@hyper.cx
Fnews-brouse 1.9(20180406) -- by Mizuno, MWE <mwe@ccsf.jp>
GnuPG Key ID = ECC8A735
GnuPG Key fingerprint = 9BE6 B9E9 55A5 A499 CD51 946E 9BDC 7870 ECC8 A735