スキルアップを始める!

【EXCEL】ハイパーリンクのリンク先を一括変換したい場合の対処法<VBA>

Excel(エクセル)
Excel(エクセル)
この記事は約2分で読めます。

※記事中に広告情報を含みます。

スキルを手に入れた時、人は強くなれる。
Youtubeでスキルアップを始める 電子書籍でスキルアップを始める
\ワードプレスのスキルアップはこちら!/ WordPress入門読本

ハイパーリンクが。。。

ハイパーリンク先のフォルダのファイルをごっそり移動してしまい、ハイパーリンクが使えない・・・

しかし、ハイパーリンクを「置換」しようとしても、できない・・・。

※検索対象を値に変えてもダメ…

ハイパーリンクは普通には検索対象にならない様子。

ただし、次の方法を試みてみると、なんとかなりそうな感じです。

マクロを使う

調べてみると、ハイパーリンクを一括変換するためには、どうやらマクロを使う必要がありそうです。

[rml_read_more]

ということでVBAコードをお借りしてマクロを組んでみます。

Replace

Sub ハイパーリンクの置きかえ()
 Dim H As Hyperlink
 For Each H In Range("B1:B100").Hyperlinks
  H.Address = Replace(H.Address, 
"C:\Users\eguchi\Desktop\", 
"C:\Users\eguchi\Documents\")
 Next
End Sub

Range()の中とReplaceの” “内は変換する内容に書き換え

実行。

実行してもVBAの画面上は何も変わりませんが

EXCELのセルを確認すると、たしかにハイパーリンクが変わっています!!

まとめ

Rangeの範囲やReplaceの文字列を変えると応用が効きますので、ハイパーリンクの一括変換で困っている方は、ぜひ試してみて下さい★
\(^o^)/

スプレッドシートのハイパーリンク関数も便利です↓

URLをコピーしました!