Paul ha un documento che deve confrontare con un elenco di parole contenuto in un altro documento. Se il documento da controllare contiene una delle parole nella lista, allora la parola nel documento (non nella lista delle parole)

deve essere evidenziato essendo reso in grassetto. L’elenco delle parole è ampio, dell’ordine di 20.000 parole, e Paolo si chiede quale sia il modo migliore per farlo.

Ci sono due modi per procedere. Il primo è scrivere la tua macro che farà i confronti per te. Se metti le parole che vuoi controllare in un documento chiamato “checklist.doc” nell’unità C:, allora puoi usare la seguente macro:

Sub CompareWordList()

Dim sCheckDoc As String     Dim docRef As Document     Dim docCurrent As Document     Dim wrdRef As Object

sCheckDoc = "c:\checklist.doc"

Set docCurrent = Selection.Document     Set docRef = Documents.Open(sCheckDoc)

docCurrent.Activate

With Selection.Find         .ClearFormatting         .Replacement.ClearFormatting         .Replacement.Font.Bold = True         .Replacement.Text = "^&"

.Forward = True         .Format = True         .MatchWholeWord = True         .MatchCase = True         .MatchWildcards = False     End With

For Each wrdRef In docRef.Words         If Asc(Left(wrdRef, 1)) > 32 Then             With Selection.Find                 .Wrap = wdFindContinue                 .Text = wrdRef                 .Execute Replace:=wdReplaceAll             End With         End If     Next wrdRef

docRef.Close     docCurrent.Activate End Sub

Tutto quello che devi fare è avere il documento aperto che desideri controllare, quindi eseguire la macro. Se il documento contenente le parole da controllare è denominato in modo diverso o in una posizione diversa, è sufficiente modificare la riga che imposta sCheckDoc in modo che abbia un percorso completo diverso per il documento.

Fondamentalmente, la macro cattura ogni parola dall’elenco di parole e quindi esegue un’operazione Trova e sostituisci utilizzando quella parola nel documento. Se sono presenti molte, molte parole nell’elenco di parole, l’esecuzione della macro può richiedere un po ‘di tempo: 20.000 operazioni di ricerca e sostituzione sono poche!

L’altro approccio che puoi provare è utilizzare un’applicazione di terze parti per eseguire il lavoro per te. C’è un buon articolo e un’applicazione disponibile gratuitamente su questo sito:

http://pubs.logicalexpressions.com/pub0009/LPMArticle.asp?ID=160

Questo approccio è particolarmente interessante perché non si limita a rendere audaci le parole abbinate, ma ti consente di impostarle su un colore che potresti desiderare.

_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 (502) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia della barra multifunzione di Word (Word 2007 e più tardi) qui:

Evidenzia parole da un elenco di parole.