Quando si cerca del testo in un documento, è facile cercare formati come “grassetto” o “corsivo”. Puoi anche cercare “non grassetto” e “non corsivo”. Puoi cercare testo di un colore specifico, ma Word non ti consente di cercare testo diverso da un colore specifico. Ad esempio, non è possibile cercare testo “non nero”.

Se devi cercare testo che non sia nero, il modo migliore per farlo è con una macro. Considera la seguente macro, che richiede il testo di ricerca e quindi cerca la prima istanza non nera di quel testo.

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

Notare che la macro verifica se il colore del testo abbinato è diverso dal nero (wdColorBlack) e dal colore automatico (wdColorAutomatic). Questo perché il colore automatico è nero sulla maggior parte dei sistemi.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (1387) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia a nastro di Word (Word 2007 e più tardi) qui:

Ricerca di testo non in nero.