Header in Excel

[Guest]

I would like to make a cell in a worksheet the header on all the worksheets
in the workbook. Is this possible and if so how?

Thanks,
Cheryl

 

[Guest]

I've done this with a Workbook_Before print event

I'll copy one of mine in and you can modify it as necessary. Note that I
used some named ranges that were defined within the workbook.

Application.ScreenUpdating = False
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = "Company Proprietary"

.RightHeader = ""
.LeftFooter = Range("ToolName").Text & Chr(10) & _
"Issue Date: " & Range("Issue_Date").Value & Chr(10) & _
"Issue Number: " & Range("IssueNumber").Value

.CenterFooter = "Company Proprietary" '& Chr(10) & "&P of &N"
.RightFooter = ""
.CenterHorizontally = True
.CenterVertically = False
End With
Application.ScreenUpdating = True
End Sub

Press CTRL F11 and add this to the "ThisWorkbook" Excel Object.

 

[Bernard Liengme]

CTRL+F11 or ALT+F11 ?
best wishes

 

[Guest]

Oops, ALT+F11. I do it all the time and my fingers know where to go. Thanks
for the save.