Cherylには、多くのハイパーリンクを含むワークシートがあります。各ハイパーリンクの表示テキストは、ハイパーリンクのターゲットとは異なります。これらのハイパーリンクはすべて列Aにあります。シェリルは表示テキストを列Aに残し、ターゲットURLを列Bに移動し、列Aのハイパーリンクを削除します。最終的に必要なのは列Aの表示テキストです。 、列BのURL、およびワークシートにアクティブなハイパーリンクはありません。

この方法でハイパーリンクから情報を処理および抽出するには、マクロを使用する必要があります。以下は、選択したセル範囲内にあるハイパーリンクを調べる柔軟なマクロの例です。ハイパーリンクが見つかった場合、ハイパーリンクのURLがハイパーリンクの右側に入力され、ハイパーリンク自体が削除されます。

これにより、ハイパーリンクがあったセルに表示テキストが残ります。

Sub GetHLInfo()

Dim rRng As Range     Dim cell As Range

Set rRng = ActiveSheet.Range(ActiveWindow.Selection.Address)

For Each cell In rRng         If cell.Hyperlinks.Count > 0 Then             cell.Offset(0, 1) = cell.Hyperlinks(1).Address             cell.Hyperlinks(1).Delete         End If     Next End Sub

注:

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

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

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