メインコンテンツへスキップ

Word文書からすべてのハイパーリンクを選択してコピーするにはどうすればよいですか?

Author: Sun Last Modified: 2025-05-23

複数のハイパーリンクが含まれる長いWord文書があり、それらを一度にコピーする必要がある場合、手動でそれぞれを選択するのは時間がかかることがあります。幸いなことに、すべてのハイパーリンクやそのアドレスを抽出してコピーする効率的な方法があります。このガイドでは、それを迅速に行うためのさまざまな方法を紹介します。


VBAを使用してすべてのハイパーリンクを新しい文書にコピーする

VBAを使用すると、文書内のすべてのハイパーリンクを抽出し、新しい文書にコピーすることができます。

  1. ハイパーリンクが含まれているWord文書を開き、Alt + F11を押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。
  2. クリック 挿入 > モジュール次に、以下のVBAコードをコピーしてモジュールウィンドウに貼り付けます:
    Sub HyperlinksExtract()
    'Updateby20140214
        Dim oLink As Hyperlink
        Dim docCurrent As Document 'current document
        Dim docNew As Document 'new document
        Dim rngStory As StoryRanges
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            oLink.Range.Copy
            docNew.Activate
            Selection.Paste
            Selection.TypeParagraph
        Next
        
        Set docNew = Nothing
        Set docCurrent = Nothing
    End Sub
    
  3. クリック 実行 ボタンを押してVBAコードを実行します。元の文書内のすべてのハイパーリンクを含む新しい文書が開きます。
    Document with text with hyperlinks >>> New document with only text with hyperlinks

注意: このVBA方法は、テキストベースのハイパーリンクにのみ有効です。画像に埋め込まれたハイパーリンクは抽出されません。


VBAを使用して、プレーンテキスト形式のハイパーリンクアドレスのみを新しい文書に抽出する

このVBA方法は、文書内のハイパーリンクアドレスのみを抽出し、新しい文書に貼り付けます。

  1. Word文書を開き、Alt + F11を押してVBAエディタを開きます。
  2. クリック 挿入 > モジュール次に、以下のVBAコードをコピーして貼り付けます:
    Function GetAllHyperlinks()
    'Updateby20140214
        Dim docCurrent As Document
        Dim docNew As Document
        Dim oLink As Hyperlink
        Dim rng As Range
        Application.ScreenUpdating = False
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            Set rng = docNew.Range
            rng.Collapse
            rng.InsertParagraph
            rng.InsertAfter (oLink.Address)
        Next
        docNew.Activate
        Application.ScreenUpdating = True
        Application.ScreenRefresh
    End Function
    
  3. クリック 実行 ボタンを押すと、プレーンテキスト形式のハイパーリンクアドレスのみを含む新しい文書が作成されます。
    Document with text with hyperlinks >>> New document with only hyperlink addresses

注意: 抽出されたハイパーリンクアドレスは、元の文書と同じ順序で表示されない場合があります。


Kutools for Wordを使用してハイパーリンクまたはアドレスをクリップボードにコピーする

Kutools for Wordは、すべてのハイパーリンクまたはそのアドレスをクリップボードにコピーする簡単な方法を提供します。数回のクリックで完了します。

Kutools for Wordについて、AI 🤖を搭載し、100 以上の便利な機能を提供して作業を簡素化します。
  1. Kutools Plus」→「ハイパーリンクをコピー」をクリックします。
    Copy Hyperlink button on the Kutools tab on the ribbon
  2. すべてのハイパーリンクをクリップボードにコピー」ダイアログボックスで、目的のオプションを選択します。
    Copy all hyperlinks to clipboard dialog box
  3. Ctrl + Vを押して、コピーしたハイパーリンクを任意の場所に貼り付けます。
  • ハイパーリンク 」オプションを選択すると、表示テキストとハイパーリンクの両方がコピーされます。
    Text with hyperlinks pasted
  • ハイパーリンクアドレス 」オプションを選択すると、ハイパーリンクアドレスのみがプレーンテキストとしてコピーされます。
    Hyperlinks addresses pasted
Kutools for Word は、作業を効率化し、文書処理スキルを向上させる究極の Word アドインです。今すぐ入手してください!

デモ: Word文書内のすべてのハイパーリンクをコピーする

このビデオでKutools for WordからKutools / Kutools Plusタブを発見してください。100+ の機能と永久に無料のAIユーティリティをお楽しみください。今すぐダウンロード!


複数のWord文書やExcelブックをChromeやEdgeのようにタブで閲覧・編集!

Chrome、Safari、Edgeで複数のウェブページを閲覧するように、Office Tabを使えば、1つのWordウィンドウまたはExcelウィンドウで複数のWord文書やExcelブックを開き、管理できます。文書やブック間の切り替えは、タブをクリックするだけで簡単に行えます!

今すぐOffice Tabを無料でお試しください!


関連記事:

最高のオフィス生産性ツール

Kutools for Word - Wordの体験を100以上の素晴らしい機能で向上させましょう!

🤖 Kutools AI機能: AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ (形式を保持) / スーパー トランスレート (形式を保持) / AI編集 / AI校正...

📘 文書のマスタリー: ページの分割 / 文書の結合 / 様々な形式で選択をエクスポート (PDF/TXT/DOC/HTML...) / 一括PDF変換...

内容の編集: 複数ファイルにわたる一括検索と置換 /すべての画像をリサイズ / 表の転置 / 表をテキストに変換...

🧹 簡単なクリーンアップ:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃 / その他の削除ツールは削除グループへ...

創造的な挿入: 千の区切りを挿入 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の画像 / 挿入グループでさらに発見...

🔍 精密な選択: 特定のページ / / 図形 / 見出し段落を特定 / より多くの 選択 機能でナビゲーションを強化...

スター強化: 任意の場所に移動 / 繰り返しテキストを自動挿入 / 文書ウィンドウ間を切り替え /11 変換ツール...

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を試してみませんか?今すぐKutools for Wordをダウンロード!🚀