Quando lavori in un documento di grandi dimensioni, potresti voler sapere quante volte una particolare stringa di testo si trova all’interno di una parte del documento.

Un modo per trovare queste informazioni è creare una macro che esaminerà un intervallo di testo selezionato per vedere quante istanze contiene.

Considera la seguente macro:

Sub CountString()

Dim MyDoc As String, txt As String, t As String     MyDoc = ActiveDocument.Range.Text     txt = InputBox("Text to find")

t = Replace(MyDoc, txt, "")

MsgBox (Len(MyDoc) - Len(t)) / Len(txt) & " occurrences of " & txt End Sub

Seleziona il testo che desideri analizzare e quindi esegui la macro. Assegna il testo selezionato alla variabile MyDoc (quindi nulla nel documento effettivo è interessato) e quindi ti chiede di inserire la stringa di testo che desideri trovare. La funzione Sostituisci viene quindi utilizzata per sostituire tutte le istanze di quella stringa all’interno della variabile MyDoc. Il testo, dopo la sostituzione, viene assegnato alla variabile t. La lunghezza del testo “prima” (MyDoc)

e il testo “dopo” (t) viene confrontato e viene calcolato il numero di sostituzioni.

_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 (3788) 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: