Ricerca di testo non in nero (Microsoft Word)
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.
WordTips è la tua fonte di formazione economica su Microsoft Word.
(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (11644) si applica a Microsoft Word 2007, 2010, 2013, 2016, 2019 e Word in Office 365. Puoi trovare una versione di questo suggerimento per vecchia interfaccia del menu di Word qui: