![]() |
|
|
|
#1
|
||||
|
||||
|
Hi NG,
Try: Code:
Sub PrintPages2Plus()
With ActiveDocument
If .ComputeStatistics(wdStatisticPages) > 1 Then
.PrintOut Background:=True, Range:=wdPrintRangeOfPages, Pages:="2-" & .ComputeStatistics(wdStatisticPages)
Else
'your other routine goes here
End If
End With
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
#2
|
|||
|
|||
|
Hi Macropod,
Thanks for the code. Works fine when there is no page number is given in the document. But when I have execute this on a file which have different page nos. the printer status box shows N/A in "pages" column and doesnt print anything. I forgot in my previous mail that there are different page numbers in each file. Thanks & Regards, NG |
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
How to print on both sides of a page manually
|
Guy Roth | PowerPoint | 5 | 03-22-2012 06:43 AM |
Background Page color is not covering the entire page when I print the doc
|
prateekb | Word | 4 | 03-14-2012 01:19 AM |
Dont print header on first page
|
jezh | Word | 1 | 02-01-2012 09:37 AM |
| Not able to print in a page | cookiegal | Outlook | 0 | 06-02-2011 01:02 AM |
| Print page one | garon5 | Outlook | 0 | 03-07-2007 02:47 PM |