ワードマクロで、下線の色を変更するVBAコードをご紹介します。
このページのマクロコードは、コピペで使えます。
ぜひお試しください!
下線の色を変更
以下のWordVBAを実行すると、下線の色を変更します。
Sub 下線の色を変える()
'検索条件クリア
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
'検索
With Selection.Find
.Font.Underline = wdUnderlineSingle
.Wrap = wdFindContinue
'下線の色を設定
.Replacement.Font.UnderlineColor = wdColorRed
End With
'下線の色を変更
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
マクロ実行後
下線の色を「黒 → 赤」 に色付けしました。
この記事がお役に立ちますと幸いです。

【ワードマクロ】下線を引く1行コード:4つの使用例を紹介するよ
...