Hi Jamie
I read in your other thread that you got it working
Sorry I don't tell you that this macro also print ( you not use the print button of excel)
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Jamie" wrote in message ...
Hi Ron, I'm sorry I forgot to mention that the document is protected, would
that prevent the macro from working.
--
Jamie
"Ron de Bruin" wrote:
Hi Jamie
I have no problem when I run it ?
Test it on a new workbook
Do I need to include:
No, just examples
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Jamie" wrote in message ...
Hi Ron, I have tried this macro, but my header does not appear on the second
page. I changed the coding to this:
Sub Test()
Dim TotPages As Long
TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
With ActiveSheet.PageSetup
.LeftHeader = ""
ActiveSheet.PrintOut From:=1, To:=1
.LeftHeader = "Unit Intake Report (continued)"
ActiveSheet.PrintOut From:=2, To:=TotPages
End With
End Sub
Do I need to include:
.CenterFooter = "&8Page &P & of &N"
.RightFooter = "&8Last Saved : &B" &
ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")
.LeftFooter = "&8" & ActiveWorkbook.FullName & Chr(10) & "Sheetname
: &B" & ActiveSheet.Name
Thanks
--
Jamie
"Ron de Bruin" wrote:
Hi Jamie
If you print with a macro it is possible
See http://www.rondebruin.nl/print.htm#Header
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Jamie" wrote in message ...
I'm working in Excel 2002.
How can I suppress a header on the first page, but have it print on the
pages that follow.
The text that I want printed in the header beginning on page 2 is Unit
Intake Report (continued)
Thanks
--
Jamie