在文档中搜索文本时,很容易搜索诸如“粗体”或“斜体”之类的格式。您还可以搜索“非粗体”和“非斜体”。您可以搜索特定颜色的文本,但是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_网站上的任何其他页面)上描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(1387)适用于Microsoft Word 97、2000、2002和2003。您可以为Word(Word 2007)的功能区界面找到此技巧的版本。和更高版本)在这里: