footer or header

  • Thread starter Thread starter LLGareau
  • Start date Start date
L

LLGareau

Is it possible to have a footer or header only on the
first page of a document of 10 pages in Excel. In know it
is possible with word but in Excel?

Please provide the step to do this?
 
You could use a macro like this one form Ron de Bruin to do it

Sub print_header()
'will print header on 1st page only
'By: Ron de Bruin
Totpage = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
With ActiveSheet.PageSetup
.LeftHeader = "test"
.CenterFooter = ActiveSheet.Range("A1")
.CenterHeader = "&8Page &8&P & of &N"
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1
.LeftHeader = ""
.CenterHeader = ""
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=Totpage
End With
End Sub


--
Paul B
Always backup your data before trying something new
Using Excel 2000 & 97
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **
 
Back
Top