{"id":52263,"date":"2009-10-13T00:01:00","date_gmt":"2009-10-13T00:01:00","guid":{"rendered":"https:\/\/blogs.technet.microsoft.com\/heyscriptingguy\/2009\/10\/13\/hey-scripting-guy-how-do-i-count-the-number-of-pages-in-a-group-of-office-word-documents\/"},"modified":"2009-10-13T00:01:00","modified_gmt":"2009-10-13T00:01:00","slug":"hey-scripting-guy-how-do-i-count-the-number-of-pages-in-a-group-of-office-word-documents","status":"publish","type":"post","link":"https:\/\/devblogs.microsoft.com\/scripting\/hey-scripting-guy-how-do-i-count-the-number-of-pages-in-a-group-of-office-word-documents\/","title":{"rendered":"Hey, Scripting Guy! How Do I Count the Number of Pages in a Group of Office Word Documents?"},"content":{"rendered":"

\"Bookmark<\/a> <\/p>\n

\"Hey,<\/p>\n

Hey, Scripting Guy! I am so mad right now, I could just about scream. In fact, if you don’t mind, I believe I will scream. We have this stupid printer at work that I have to use to print out a very important report. This printer is rather slow when printing out these reports; it prints out about 30 pages a minute. It has a hopper that holds 10 reams of paper, which is 5,000 sheets. <\/p>\n

Why am I telling you all this? Well, when I print out the monthly report, it takes several hours to print. I generally go and fill up the hopper with all the paper it will hold, go back to my desk, and start the print job and go home. When I come back the next day, the reports are ready—<\/span> if I am lucky. Tying up the printer during the day is not a real option, and I really do not want to have to stay late and babysit the machine. Why am I mad, you may ask? The last two months in a row the stupid printer has run out of paper. It seems that some of the partners have been adding extra stuff to their monthly reports (probably trying to explain their poor performance, but that is a different story). Is there a script I can use that will tell me the page count of all the Microsoft Word documents in a folder? I could then run that script and tell if I needed to reduce the number of copies of the report I was making. <\/p>\n

— KR<\/p>\n

\"Hey,<\/p>\n

Hello KR, <\/p>\n

Microsoft Scripting Guy Ed Wilson here. Well the sun is shining here in Charlotte, NC in the United States. For the last couple of days, when I woke up to go running, I thought I was back in Edinburgh, Scotland. It may have been the cool thick morning air, or maybe it is the time of year. The last time I was in Edinburgh<\/font><\/a>, it was during Halloween<\/font><\/a> (which is a cool time to visit that city by the way). Anyway, KR, I am listening to Derek Trucks<\/font><\/a> on my Zune, thinking about the last time I was in Edinburgh, and looking through your e-mail to scripter@microsoft.com<\/span><\/a>. I was writing the Microsoft Press book, Windows PowerShell Step by Step<\/font><\/a>, during my trip to Edinburgh and was reminded of the book-writing process by your e-mail. One of the things a writer is always concerned about is the number of pages that will be in the final document. <\/p>\n

KR, I decided to write a Windows PowerShell script for you that will list the number of pages for each Word document in a folder. The complete GetPageCountOfWordDocs.ps1 script is seen here. <\/p>\n

GetPageCountOfWordDocs.ps1<\/strong><\/p>\n

Function Set-Variables
{
 <\/span>$folderpath = “c:fso*”
 <\/span>$fileTypes = “*.docx”,”*doc”
 <\/span>$confirmConversion = $false
 <\/span>$readOnly = $true
 <\/span>$addToRecent = $false
 <\/span>$passwordDocument = “password”
 <\/span>$pageCountFile = “C:fsoPageCount.csv”
 <\/span>$numberOfPages = 0
 <\/span>Set-OutputFile
} #end Set-Variables<\/p>\n

Function Set-OutputFile
{
 <\/span>if(Test-Path -path $pageCountFile)
   <\/span>{ Remove-Item -path $pageCountFile }
 <\/span>“name,pageCount” >> $pageCountFile
 <\/span>Get-WordDocuments
} #end Set-OutputFile<\/p>\n

Function Get-WordDocuments
{
  <\/span>“Counting pages in Word Docs in $folderPath”
 <\/span>$word = New-Object -ComObject word.application
 <\/span>$word.visible = $false
 <\/span>Get-ChildItem -path $folderpath -include $fileTypes |
 <\/span>foreach-object `
  <\/span>{
   <\/span>$path =  <\/span>($_.fullname).substring(0,($_.FullName).lastindexOf(“.”))
   <\/span>$doc = $word.documents.open($_.fullname, $confirmConversion, $readOnly,
   <\/span>$addToRecent,   <\/span>$passwordDocument)
   <\/span>$window = $doc.ActiveWindow
   <\/span>$panes = $window.Panes
   <\/span>$pane = $Panes.item(1)
   <\/span>“  <\/span>$($_.name), $($pane.pages.count)”  <\/span>>> $pageCountFile
   <\/span>$doc.close()
  <\/span>} #end Foreach-Object
 <\/span>$word.Quit()
 <\/span>Get-pageCount
} #end Get-WordDocuments<\/p>\n

Function Get-pageCount
{
 <\/span>$wdcsv = import-csv -path $pageCountFile
 <\/span>for ($i = 0 ; $i -le $wdcsv.length -1 ; $i++)
 <\/span>{
  <\/span>$numberOfPages += [int32]$wdcsv[$i].pageCount
 <\/span>}
 <\/span>$numberOfPages
} #end Get-pageCount<\/p>\n

# *** Entry Point to Script ***<\/p>\n

Set-Variables<\/p>\n

<\/font><\/font><\/span><\/p>\n

<<\/p>\n

p style=”MARGIN: 0in 0in 8pt” class=”MsoNormal”>In Microsoft Office Word 2007 and in Microsoft Word 2010, the number of pages in a document is displayed in the lower left corner of the document. The information can also be obtained from the review tab by clicking the Word Count button.<\/p>\n

The Word Count dialog box is shown here:<\/p>\n

\"Image<\/p>\n

But, KR, as you pointed out, if you have several Microsoft Word documents you will need to script the page count total. The GetPageCountOfWordDocs.ps1 script is based upon the CountWordsInWord.ps1 from yesterday’s Hey<\/span>, Scripting Guy! <\/span>post<\/a>. <\/p>\n

Because the GetPageCountOfWordDocs.ps1 script performs the same basic steps, the same functions will be used. The first function is the Set-Variables<\/b> function. The only changes to the function were to rename a couple of variables. The first new variable name is $pageCountFile<\/b>, which contains the path to the file that will be created to hold the page counts of each Microsoft Word document. The second new variable name is the $numberOfPages<\/b> variable that is used to hold the number of pages in the Word document. The Set-Variables<\/b> function is shown here. <\/p>\n

Function Set-Variables
{
 <\/span>$folderpath = “c:fso*”
 <\/span>$fileTypes = “*.docx”,”*doc”
 <\/span>$confirmConversion = $false
 <\/span>$readOnly = $true
 <\/span>$addToRecent = $false
 <\/span>$passwordDocument = “password”
 <\/span>$pageCountFile = “C:fsoPageCount.csv”
 <\/span>$numberOfPages = 0
 <\/span>Set-OutputFile
} #end Set-Variables<\/p>\n

<\/font><\/span><\/p>\n

The Set-OutputFile<\/b> function is the same as the Set-OutputFile<\/b> function used in the GetPageCountOfWordDocs.ps1 script. The only changes were changing variable names and the header names for the CSV file. The variable $pageCountFile<\/b> holds the path to the CSV file that gets created to hold the page count data. The column header values for the output CSV file are name <\/b>and pageCount<\/b>. The Set-OutputFile<\/b> function is seen here:<\/p>\n

Function Set-OutputFile
{
 <\/span>if(Test-Path -path $pageCountFile)
   <\/span>{ Remove-Item -path $pageCountFile }
 <\/span>“name,pageCount” >> $pageCountFile
 <\/span>Get-WordDocuments
} #end Set-OutputFile<\/p>\n

<\/font><\/span><\/p>\n

The Get-WordDocuments<\/b> function begins by creating the word.application<\/b> COM object. This object was discussed in yesterday’s Hey Scripting Guy! post as well. The Get-ChildItem<\/b> cmdlet returns a collection of the Microsoft Word documents from the folder, and pipes the resulting objects to the ForEach-Object<\/b> cmdlet. Each document is opened by using the open<\/b> method from the document<\/b> object. All this was also discussed in yesterday’s Hey Scripting Guy! post. <\/p>\n

The part of the Get-WordDocuments<\/b> function that is changed is the code that retrieves the page count. The first thing you need to do is to retrieve a window<\/font><\/a> object. You can obtain a b object by accessing the ActiveWindow<\/b> property of the document<\/b> object. This is seen here:<\/p>\n

$window = $doc.ActiveWindow<\/p>\n

<\/font><\/span><\/p>\n

After you have a window<\/b> object, you retrieve a panes collection<\/font><\/a> by accessing the panes<\/b> property of the window<\/b> object. This is seen here:<\/p>\n

$panes = $window.Panes<\/p>\n

<\/font><\/span><\/p>\n

You use the item<\/b> method from the panes<\/b> collection to retrieve a pane<\/font><\/a> object. This code is shown here:<\/p>\n

$pane = $Panes.item(1)<\/p>\n

<\/font><\/span><\/p>\n

After you have a pane<\/b> object, you use the pages<\/b> property to retrieve a pages collection<\/font><\/a>. The pages<\/b> collection has the count<\/b> property that will tell you how many pages are in the document. These commands are gathered together and the page count is piped to the CSV file. This is seen here:<\/p>\n

“  <\/span>$($_.name), $($pane.pages.count)”  <\/span>>> $pageCountFile<\/p>\n

<\/font><\/span><\/p>\n

The complete Get-WordDocuments function is seen here. <\/p>\n

<\/font><\/span><\/p>\n

Function Get-WordDocuments
{
  <\/span>“Counting pages in Word Docs in $folderPath”
 <\/span>$word = New-Object -ComObject word.application
 <\/span>$word.visible = $false
 <\/span>Get-ChildItem -path $folderpath -include $fileTypes |
 <\/span>foreach-object `
  <\/span>{
   <\/span>$path =  <\/span>($_.fullname).substring(0,($_.FullName).lastindexOf(“.”))
   <\/span>$doc = $word.documents.open($_.fullname, $confirmConversion, $readOnly,
   <\/span>$addToRecent,   <\/span>$passwordDocument)
   <\/span>$window = $doc.ActiveWindow
   <\/span>$panes = $window.Panes
   <\/span>$pane = $Panes.item(1)
   <\/span>“  <\/span>$($_.name), $($pane.pages.count)”  <\/span>>> $pageCountFile
   <\/span>$doc.close()
  <\/span>} #end Foreach-Object
 <\/span>$word.Quit()
 <\/span>Get-pageCount
} #end Get-WordDocuments<\/p>\n

<\/font><\/span><\/p>\n

The Get-pageCount<\/b> function is basically the same as the Get-wordCount<\/b> function from yesterday’s Hey, Scripting Guy! post. The only change is the variable names. The $pageCountFile<\/b> variable refers to the CSV file that was created in the Get-WordDocuments<\/b> function. The $numberOfPages<\/b> variable is used to collect the total number of pages in the collection of Word documents. The Get-pageCount<\/b> function is seen here:<\/p>\n

Function Get-pageCount
{
 <\/span>$wdcsv = import-csv -path $pageCountFile
 <\/span>for ($i = 0 ; $i -le $wdcsv.length -1 ; $i++)
 <\/span>{
  <\/span>$numberOfPages += [int32]$wdcsv[$i].pageCount
 <\/span>}
 <\/span>$numberOfPages
} #end Get-pageCount<\/p>\n

<\/font><\/span><\/p>\n

Well, KR, thanks for a cool question. As you can see, the technique for obtaining the page count from a collection of Word documents is similar to the technique for gathering the number of words. Unfortunately, it is not as straight forward as querying the value of a different property. Join us tomorrow as Word Week continues. <\/p>\n

If you want to know exactly what we will be looking at tomorrow, follow us on Twitter<\/font><\/a> or Facebook<\/a>. If you have any questions, send e-mail to us at scripter@microsoft.com<\/a> or post your questions on the Official Scripting Guys Forum<\/a>. See you tomorrow. Until then, peace.<\/p>\n

Ed Wilson and Craig Liebendorfer, Scripting Guys<\/p>\n

<\/span><\/b><\/p>\n

 <\/p>\n","protected":false},"excerpt":{"rendered":"

Hey, Scripting Guy! I am so mad right now, I could just about scream. In fact, if you don’t mind, I believe I will scream. We have this stupid printer at work that I have to use to print out a very important report. This printer is rather slow when printing out these reports; it […]<\/p>\n","protected":false},"author":595,"featured_media":87096,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_acf_changed":false,"footnotes":""},"categories":[1],"tags":[84,49,3,45],"class_list":["post-52263","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-scripting","tag-microsoft-word","tag-office","tag-scripting-guy","tag-windows-powershell"],"acf":[],"blog_post_summary":"

Hey, Scripting Guy! I am so mad right now, I could just about scream. In fact, if you don’t mind, I believe I will scream. We have this stupid printer at work that I have to use to print out a very important report. This printer is rather slow when printing out these reports; it […]<\/p>\n","_links":{"self":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/52263","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/users\/595"}],"replies":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/comments?post=52263"}],"version-history":[{"count":0,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/52263\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media\/87096"}],"wp:attachment":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media?parent=52263"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/categories?post=52263"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/tags?post=52263"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}