他の人からワークシートを継承する場合、一部のワークシートには非常に多くのハイパーリンクが含まれていることがあります。これらのハイパーリンクは、ワークシートに情報をインポートまたは入力すると、Excelによって自動的に作成されることがよくあります。 (Webページからコピーしたワークシートに情報を貼り付けると常に表示されます。)

これらのハイパーリンクを削除する場合は、それらを右クリックして[ハイパーリンク]、[ハイパーリンク]の順に選択します。コンテキストメニューからハイパーリンクを削除します。

数十または数百のハイパーリンクを使用してこれを行うと、すぐに膨大な時間がかかる可能性があります。このようなタスクをより迅速に実行するには、マクロを使用する必要があります。

次のマクロは、ワークシートに含まれる可能性のある他の何にも影響を与えることなく、ワークシート内のすべてのハイパーリンクをすばやく削除します。

Sub KillLinks1()

Do Until ActiveSheet.Hyperlinks.Count = 0         ActiveSheet.Hyperlinks(1).Delete     Loop End Sub

マクロは、ハイパーリンクコレクションをステップ実行し、そこにあるものをすべて削除することで機能します。 (Hyperlinksコレクションを使用すると、ドキュメント内のすべてのハイパーリンクにアクセスできます。便利ですね。)

必要に応じて、マクロをさらに短くして1行にすることができます。

Sub KillLinks2()

ActiveSheet.Hyperlinks.Delete End Sub

影響を与えるワークシートを選択し、これらのマクロの1つを実行すると、時間を大幅に節約できます。

注:

このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント(10782)は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。