Liza sta lavorando con 50 piccoli documenti, molti meno di una pagina. Tutti sono in file separati (no master o sottodocumenti). Vorrebbe conoscere il conteggio totale delle parole in tutti i file e si chiede se esiste un modo semplice per ottenere il conteggio.

Un’opzione è utilizzare un componente aggiuntivo di terze parti in grado di calcolare il conteggio delle parole per te. Ecco tre suggerimenti che potresti voler controllare:

WordCounter: http://www.editorium.com/counter.htm FineCount: http://www.tilti.com/software-for-translators/finecount/?id=2_finecountv2 Total Assistant: http://www.surefiresoftware.com/totalassistant/

Ovviamente, se preferisci “eseguire il rollio tuo” piuttosto che affidarti alla soluzione di qualcun altro, puoi creare una macro relativamente semplice che scorrerà ogni file in una cartella e calcolerà il conteggio totale delle parole.

Sub GetWordCount()

Dim docname As String     Dim NumWords As Long     Dim NumFiles As Integer     Dim PathName As String

PathName = "c:\mypath\"



NumWords = 0     docname = Dir(PathName & ".doc")

While docname <> ""

NumFiles = NumFiles + 1         Documents.Open FileName:=PathName & docname, Visible:=False         Documents(docname).Activate

NumWords = NumWords + ActiveDocument.BuiltInDocumentProperties("Number of words").Value

Documents(docname).Close savechanges:=False         docname = Dir     Wend

MsgBox ("There are " & NumWords & " words in " & NumFiles & " documents.")

End Sub

Per utilizzare la macro, assicurati di modificare la variabile PathName in modo che rifletta il percorso della cartella contenente i documenti che desideri conteggiare. (La designazione del percorso deve terminare con una barra rovesciata.) Quando si esegue la macro, viene visualizzato il conteggio delle parole in una finestra di messaggio.

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

Conteggi di parole per un gruppo di documenti.