I am trying to do this but I am having no luck. I am not having much
luck finding a topic that addresses this specifically either. I know I
can print different footers on different sheets, but what about the
pages within a sheet? Any help would be appreciated.

I done this but with headers, this will do it for Footers

Create a button and assign these properties

Private Sub CommandButton1_Click()

'Change sheet1 top the name of the worksheet
With ActiveSheet.Sheet1

'Enter your footers inbetween the "" ie "This is my footer"
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""

End With
'PrintOut From:=2, To:=2 is the page you require to print
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=2, Copies:=1, Collate _
:=True

'For another page copy from with active down to :=true paste underneath this
ciode and then change its properties

end sub

HTH

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200602/1

Thanks Crowbar.
It sounds like I will have to wait for footer placement at print time.
I was hoping to establish the footers based on pagebreaks prior to
printing. I guess that may be a pipe dream.