Word文書の複数の下線の色をバッチで変更する2つの簡単な方法

ワードソリューション 2025 年 9 月 28 日

この記事では、Word文書の複数の下線の色をバッチで変更する2つの簡単な方法の説明に焦点を当てます。

デフォルトでは、Wordの下線の色は「自動」に設定されています。しかし、単調になることもあります。したがって、ドキュメントに設定されている色を多様化し、重要なコンテンツを目立たせるには、下線の色を変更することをお勧めします。

作成する前に下線の色を変更するのは簡単です。したがって、以下の内容では、既存の下線の色を変更することに重点を置きたいと思います。

方法1：「高度な検索」機能を利用する

まず最初に、現在の文書内のすべての下線箇所を見つける必要があります。この目的については、以前の記事を参照してください。 Word文書で下線付きのテキストを検索する2つの簡単な方法

すべての下線を見つけて選択したら、次の手順を実行します。

「ホーム」タブの下にある下線アイコンの後ろにある逆三角形のボタンをクリックするだけです。
次に、「下線の色」の拡張メニューで好きな色を選択します。

これが私たちのビデオデモンストレーションです：

方法2：Wordマクロを実行する

Wordマクロはとても素晴らしいツールです。すべての下線を検索するだけでなく、それらの色を変更するためにも使用できます。また、両方の手順をXNUMXつのマクロで完了することができます。

まず、「開発者」タブをアクティブにしてクリックします。
次に、「コード」グループの「VisualBasic」をクリックします。
次に「通常」をクリックします。
次に、「挿入」タブをクリックします。
そして、メニューから「モジュール」を選択します。
新しいモジュールをダブルクリックして、編集スペースを開きます。
次に、次のコードをそこに貼り付けます。

Sub ChangeUnderlineColor()
  Dim objDoc As Document
  Dim objRange As Range
 
  Set objDoc = ActiveDocument
  Set objRange = objDoc.Range
 
  objRange.Find.ClearFormatting
  With objRange.Find
    .Font.Underline = wdUnderlineSingle
    .text = ""
    .Replacement.text = ""
    .Replacement.Font.UnderlineColor = wdColorBlue
    .Execute Format:=True, Replace:=wdReplaceAll
  End With
End Sub

最後になりましたが、「実行」ボタンをクリックしてください。

Notes:

まず、コード行「.Font.Underline = wdUnderlineSingle」は、このマクロが単一の下線のみを検索することを意味します。「wdUnderlineSingle」を「wdUnderlineDouble」、「wdUnderlineThick」などに変更できます。下線定数の詳細については、次のリンクにアクセスしてください。 https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
次に、コード行「.Replacement.Font.UnderlineColor = wdColorBlue」は、マクロが下線の色を青に変更することを意味します。また、その他の色定数については、次のWebサイトをご覧ください。 https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor

侵害された単語データを取得する

現代では、Wordデータの損失は非常に起こりやすい。例えば、Wordで最もよく発生するエラーは画面のフリーズだ。もちろん、プログラムを再起動することもできる。作業中の文書の自動保存バージョンが存在する場合もある。しかし、文書が完全に、あるいは部分的に失われる可能性は否定できないし、許容することもできない。そのため、データの復元方法を考えなければならない。そして、その点に関して言えば、専門家が Wordの修復ツールはその成功への鍵です。

著者紹介：

Vera Chenは、のデータ復旧の専門家です。 DataNumen、Inc。は、修復ツールを含むデータ回復テクノロジーの世界的リーダーです。破損したxls (NAIST) と pdf ソフトウェア製品を修理します。詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com