【ExcelVBA・マクロ】エクセルシート内のハイパーリンクを全てワンクリックで削除するマクロ【一瞬で解除】

ExcelVBA

Excelでコピー&ペーストしたデータに、意図せずハイパーリンクがついてしまうことはありませんか?
手作業で右クリックして削除するのは手間ですが、エクセルマクロを使えば全てのハイパーリンクを一瞬で削除できます。                                 今回はシート内の全てのハイパーリンクを解除するVBAコードをご紹介します。

エクセルのハイパーリンクを削除するマクロ

動作イメージはこちら

シートの確認

今回はこのようなシートを使います。複数のセルにハイパーリンクされた情報が入力されています。

設定されている全てのハイパーリンクを削除していきます。

VBAコード

下記のVBAコードを入力しましょう。

Sub linkDelete()

    ' アクティブシートの全ハイパーリンクを削除
    ActiveSheet.Hyperlinks.Delete

    MsgBox "ハイパーリンクを削除しました", vbInformation

End Sub

マクロ実行

さきほど入力したコードを実行すると、設定されているハイパーリンクが全て削除されているのがわかります。

コメント

タイトルとURLをコピーしました