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_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

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

このヒント（9896）は、Microsoft Excel 2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。

linkハイパーリンク情報の抽出。