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

[Guest]

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

--

Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

 

[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