If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
need to count word total for 1200 documents
Am preparing an encyclopedia that will have about 1200 + entries. Each entry
is a separate document. I need a total word count for all docs. I can use an 'open' window showing the statistics and enter word count into a spreadsheet but it seems as if there should be an easier way. Other option might be to merge all the documents into one but have heard horror stories about dealing with large docs in word. Also, I cannot find any automatic way of doing this; just cut and paste each doc into one. That would be as laborious as doing the spreadsheet count. Publisher is willing to take the docs as individual entries so we have no need to merge them all. Appreciate any help. Have had great luck with the publisher group. dcmc |
#2
|
|||
|
|||
I can't imagine trying to prepare any book from 1200+ individual documents.
Even if you don't combine *all* of them into a single document, I would still just divide the book into a few files. How many will depend on the length of the total. If this is the Encyclopaedia Britannica, then one document per volume might be feasible. If it's a single-volume encyclopedia, you might get by with four or five documents. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Donald C. McNeilly" wrote in message ... Am preparing an encyclopedia that will have about 1200 + entries. Each entry is a separate document. I need a total word count for all docs. I can use an 'open' window showing the statistics and enter word count into a spreadsheet but it seems as if there should be an easier way. Other option might be to merge all the documents into one but have heard horror stories about dealing with large docs in word. Also, I cannot find any automatic way of doing this; just cut and paste each doc into one. That would be as laborious as doing the spreadsheet count. Publisher is willing to take the docs as individual entries so we have no need to merge them all. Appreciate any help. Have had great luck with the publisher group. dcmc |
#3
|
|||
|
|||
If you put all of the documents in one folder and modify the string in the
PathToUse statement in the following macro to point to that folder and then you run this macro, it will count the words in all of the documents. For 1200 documents, I would put the kettle on to boil before you start. Dim i As Long Dim myFile As String Dim PathToUse As String Dim myDoc As Document PathToUse = "C:\Documents\" 'Error handler to handle error generated whenever 'the FindReplace dialog is closed On Error Resume Next 'Initiate the counter i i = 0 'Close all open documents before beginning Documents.Close SaveChanges:=wdPromptToSaveChanges 'Set the directory and type of file to batch process myFile = Dir$(PathToUse & "*.doc") While myFile "" 'Open document Set myDoc = Documents.Open(PathToUse & myFile) 'Increment the counter i with the number of words in the document i = i + myDoc.Words.Count myDoc.Close SaveChanges:=wdDoNoSaveChanges 'Next file in folder myFile = Dir$() Wend MsgBox "Total number of words is " & i & "." -- Please respond to the Newsgroup for the benefit of others who may be interested. Questions sent directly to me will only be answered on a paid consulting basis. Hope this helps, Doug Robbins - Word MVP "Donald C. McNeilly" wrote in message ... Am preparing an encyclopedia that will have about 1200 + entries. Each entry is a separate document. I need a total word count for all docs. I can use an 'open' window showing the statistics and enter word count into a spreadsheet but it seems as if there should be an easier way. Other option might be to merge all the documents into one but have heard horror stories about dealing with large docs in word. Also, I cannot find any automatic way of doing this; just cut and paste each doc into one. That would be as laborious as doing the spreadsheet count. Publisher is willing to take the docs as individual entries so we have no need to merge them all. Appreciate any help. Have had great luck with the publisher group. dcmc |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
updating fields | lost in cincy | Mailmerge | 5 | November 18th, 2004 07:17 PM |
Word 2002 page total page count doesn't print correctly | Ignaton | General Discussion | 1 | September 23rd, 2004 07:52 PM |
wordperfect documents to word | General Discussion | 3 | September 6th, 2004 03:17 AM | |
Word 2000/2002 - Proper Mail Merge steps for ODBC? | Tony_VBACoder | Mailmerge | 7 | September 2nd, 2004 09:21 PM |
saving all documents at once | Cindy | New Users | 4 | April 29th, 2004 09:32 AM |