هنگام جستجوی متن در یک سند، جستجو برای فرمت هایی مانند "پررنگ" یا "مورب" آسان است. همچنین می توانید عبارت های "not bold" و "not italic" را جستجو کنید. شما می توانید متنی با رنگ خاصی را جستجو کنید، اما 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) متفاوت است یا خیر. این به این دلیل است که رنگ خودکار در اکثر سیستم ها سیاه است.
