デニスには、ドキュメント内からハイパーリンクを削除する優れた機能を実行する小さなマクロがあります。彼は作業する新しいドキュメントを受け取ったばかりで、脚注にかなりの数のハイパーリンクがあります。マクロはこれらのハイパーリンクを削除せず、手動で削除するのは大変な作業です。デニスは、脚注のハイパーリンクを一度に削除する方法があるかどうか疑問に思います。

実際には、方法があります。必要に応じて、次の手順に従って手動で実行できます。

。脚注の本文内に挿入ポインタを置きます。 （どの脚注でも構いません。）

。 Ctrl + Aを押します。これにより、すべての脚注が選択されます。 （ドキュメント内のすべてのテキストが選択されている場合は、手順1を実行しなかったことを意味します。）

。 Ctrl + Shift + F9を押します。これにより、選択したテキスト（脚注）のハイパーリンクが通常のテキストに変換されます。

これらの手順は、実際には、選択したテキストのすべてのフィールドを通常のテキストに変換することに注意してください。ハイパーリンクはフィールドを使用して実装されるため、変換されます。ただし、脚注に含まれる可能性のある他のフィールドも同様です。他のフィールドを変更したくない場合、または脚注のハイパーリンクをかなり処理する必要がある場合は、代わりにマクロを使用することをお勧めします。

次のマクロは、脚注のみのハイパーリンクを削除します：

Sub RemoveFNH()

Dim h As Hyperlink

With ActiveDocument         If .Footnotes.Count >= 1 Then             With .StoryRanges(wdFootnotesStory)

For Each h In .Hyperlinks                     h.Delete                 Next h             End With         End If     End With End Sub

マクロの重要な部分は、wdFootnotesStoryストーリー範囲での作業の仕様であることに注意してください。 Word文書は複数のストーリー範囲で構成でき、それぞれがヘッダー、フッター、脚注などの異なる要素を表します。ドキュメントのすべての部分（つまり、すべてのストーリー範囲）からハイパーリンクを削除する場合は、さらに短いマクロを使用できます：

Sub RemoveAllHyperlinks()

Dim r As Range     Dim h As Hyperlink

For Each r In ActiveDocument.StoryRanges         For Each h In rng.Hyperlinks             h.Delete         Next h     Next r End Sub

マクロは、ドキュメント内の各ストーリー範囲をステップスルーし、そのストーリー範囲にハイパーリンクがある場合は、それぞれを削除します。

注：

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

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

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

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（4636）は、Microsoft Word 2007、2010、2013、および2016に適用されます。