Solved: Print last page

[bangerz]

Hi,

I am trying to create a macro in Word Xp to print out the last page of a document (could be page 3 or 4 or 5 depending on the contents) to a different printer to the rest of the document.

I am working along the lines of ActiveDocument.PrintOut Range:=

But I am unsure of how to specify the last page after Range:= as it varies on each printout.

Any help will be greatly appreciated

[fumei]

A couple of ways.

1. Move selection to the last page, then simply make the Print instruction to print the current page.
[vba]Selection.EndKey unit:=wdStory
Application.PrintOut FileName:="", _
Range:=wdPrintCurrentPage[/vba]

2. Make a Selection of the last page, then print the Selection.
[vba]Selection.EndKey unit:=wdStory
ActiveDocument.Bookmarks("\page").Range.Select
Application.PrintOut FileName:="", _
Range:=wdPrintSelection[/vba]

[bangerz]

Thanks for the help - I will try these later.

Wez

[bangerz]

Works exactly as i wanted - many thanks again

[MOS MASTER]

Hi Wez welcome to VBAX!

Don't forget to mark your thread solved.