can i put the word count automatically at the end of a document?

[paidperpage]

i would like the "word count" to print at the end of a document
automatically. The word count is important because i am paid per word for
typing the document.

 

[garfield-n-odie]

Insert a { DOCPROPERTY Words } field where you want the word count to
appear.

 

[Daiya Mitchell]

At the end of the doc, use Insert | Field to insert a NumWords field.

To make sure it is accurate when you print, in Tools | Options, Print, check
the box to update fields on printing.

 

[Charles Kenyon]

Insert > Field > NumWords

 

[Greg]

You can run the following macro:
Sub Test()
Dim wCount As String
Selection.EndKey Unit:=wdStory
wCount = ActiveDocument.ComputeStatistics(wdStatisticWords)
Selection.TypeText Text:=Chr(13) & "This document contains " _
& wCount & " words."
End Sub