Probabilmente sapevi già che Word fornisce un modo per determinare il numero di parole in una selezione o nell’intero documento. Word ha i suoi algoritmi interni per calcolare il conteggio corretto. Questo è fantastico, se hai bisogno di conoscere il conteggio delle parole effettivo.

Prima dei giorni del conteggio delle parole effettive, tuttavia, i dattilografi hanno capito il numero di parole medie in un documento. Ciò è stato fatto calcolando il numero di caratteri digitati e quindi dividendo quella cifra per cinque. Per alcuni scopi potrebbe essere necessario calcolare il conteggio delle parole utilizzando questo approccio antiquato. Questo può essere fatto con una semplice macro, come segue:

Sub WordCount()

Dim Title As String     Dim WordCount As Integer     Dim Message As String

Title = "WordCount"

WordCount = Int((Len(Selection) / 5) + 0.5)

Message = LTrim(Str(WordCount)) + " word"

If WordCount <> 1 Then Message = Message + "s"

MsgBox Message, vbOKOnly, Title End Sub

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

Contare le parole alla vecchia maniera.