Hi
Try this Heather
Sub Test()
Dim TotPages As Long
TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
ActiveSheet.PrintOut From:=TotPages, To:=TotPages
End Sub
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Heather Irvin" wrote in message ...
Hello all,
I'd like to create a macro that will print only the last page in a document.
Its a log file that accumulates lots of information, and instead of
re-printing the entire document each time... it'd be nice to have only the
last page print, or even the last 5 rows or so.
Any help or direction would be appreciated.
Thanks
Heather Irvin