Printing headers and footers

llan_man

New Member
Joined
Nov 6, 2005
Messages
45
Hi

I'm trying to print a sheet with headers and footers using the following code:

Code:
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

This works fine but when I add the following:

Code:
        .CenterHeader = "IN COMMERCIAL CONFIDENCE"
        .LeftFooter = "Printed by : " & Sheets("ADMIN").Range("j8")
        .CenterFooter = "Page " & P & " of  " & N
        .RightFooter = Now
        .PrintOut Copies:=1, Collate:=True

I get a compile error with the ".CenterHeader" highlighted.

Can anyone tell me what I'm doing wrong.

Cheers

Harv
 

Some videos you may like

Excel Facts

Copy a format multiple times
Select a formatted range. Double-click the Format Painter (left side of Home tab). You can paste formatting multiple times. Esc to stop

DominicB

Well-known Member
Joined
Oct 3, 2005
Messages
1,569
Good afternoon Harv

Something like this should do the trick for you:

With ActiveSheet.PageSetup
.CenterHeader = "IN COMMERCIAL CONFIDENCE"
.LeftFooter = "Printed by : " & Sheets("ADMIN").Range("j8")
.CenterFooter = "Page " & P & " of " & N
.RightFooter = Now
End With
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

HTH

DominicB
 

Watch MrExcel Video

Forum statistics

Threads
1,122,629
Messages
5,597,252
Members
414,133
Latest member
lucid33

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top