ドキュメント内のテキストを検索する場合、「太字」や「斜体」などの形式を簡単に検索できます。 「太字ではない」および「斜体ではない」を検索することもできます。特定の色のテキストを検索することはできますが、Wordでは特定の色以外のテキストを検索することはできません。たとえば、「黒ではない」テキストを検索することはできません。

黒以外のテキストを検索する必要がある場合は、マクロを使用するのが最善の方法です。次のマクロについて考えてみます。このマクロでは、検索テキストの入力を求められ、そのテキストの最初の黒以外のインスタンスが検索されます。

Sub FindNotBlack()

With Selection.Find         .ClearFormatting         .Text = InputBox(prompt:="Enter the search text.", _           Title:="Find Nonblack Text")

Do While .Execute             With Selection.Font                 If (.Color <> wdColorAutomatic) And _                   (.Color <> wdColorBlack) Then                     MsgBox "Found"

Exit Sub                 End If             End With         Loop     End With End Sub

マクロは、一致したテキストの色が黒（wdColorBlack）および自動色（wdColorAutomatic）と異なるかどうかを確認することに注意してください。これは、ほとんどのシステムで自動色が黒であるためです。

注：

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

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

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

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（11644）は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice 365のWordに適用されます。このヒントのバージョンは、ここにWordの古いメニューインターフェイス：

linkSearching for Non-BlackText。