Home |
Search |
Today's Posts |
#1
|
|||
|
|||
can i put the word count automatically at the end of a document?
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. |
#2
|
|||
|
|||
Insert a { DOCPROPERTY Words } field where you want the word count to
appear. paidperpage wrote: 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. |
#3
|
|||
|
|||
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. On 3/4/05 2:13 PM, "paidperpage" wrote: 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. -- Daiya Mitchell, MVP Mac/Word Word FAQ: http://www.word.mvps.org/ MacWord Tips: http://www.word.mvps.org/MacWordNew/ What's an MVP? A volunteer! Read the FAQ: http://mvp.support.microsoft.com/ |
#4
|
|||
|
|||
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. "paidperpage" wrote in message ... 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. |
#5
|
|||
|
|||
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 |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
creating forms | Microsoft Word Help | |||
how can you create quickwords in MS Office Word 2003 | Microsoft Word Help | |||
How can I keep the PDFMaker toolbar from appearing every time I o. | Microsoft Word Help | |||
How do I delete a pasted email which automatically shows in Word? | New Users | |||
How do I print the word count onto my word document | Microsoft Word Help |