ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Print heading on everypage (https://www.excelbanter.com/excel-discussion-misc-queries/76108-print-heading-everypage.html)

jamex

Print heading on everypage
 

How to print heading on everypage for all sheets of a workbook.
I grouped all sheets, then went as File-pagesetup-sheet tab, but i
see print titles option is disabled, why. But for single sheet it is
working. Please suggest how to enable it for *all sheets*.
THANKS


--
jamex
------------------------------------------------------------------------
jamex's Profile: http://www.excelforum.com/member.php...o&userid=32243
View this thread: http://www.excelforum.com/showthread...hreadid=520432


Dave Peterson

Print heading on everypage
 
I don't think you can. You'll have to go through each sheet.

jamex wrote:

How to print heading on everypage for all sheets of a workbook.
I grouped all sheets, then went as File-pagesetup-sheet tab, but i
see print titles option is disabled, why. But for single sheet it is
working. Please suggest how to enable it for *all sheets*.
THANKS

--
jamex
------------------------------------------------------------------------
jamex's Profile: http://www.excelforum.com/member.php...o&userid=32243
View this thread: http://www.excelforum.com/showthread...hreadid=520432


--

Dave Peterson

Jim May

Print heading on everypage
 
Excuse the work wrapping, but this should help (adjust to your needs).

Customize the Page Sections (Header/Footer)of a worksheet as desired.
Then from this
same worksheet - run this macro:

Sub change_all_headers()
With ActiveSheet
LF = .PageSetup.LeftFooter
CF = .PageSetup.CenterFooter
RF = .PageSetup.RightFooter
LH = .PageSetup.LeftHeader
CH = .PageSetup.CenterHeader
RH = .PageSetup.RightHeader
End With

For Each sht In Sheets
sht.Select
ActiveSheet.PageSetup.LeftFooter = LF
ActiveSheet.PageSetup.CenterFooter = CF
ActiveSheet.PageSetup.RightFooter = RF
ActiveSheet.PageSetup.LeftHeader = LH
ActiveSheet.PageSetup.CenterHeader = CH
ActiveSheet.PageSetup.RightHeader = RH
Next sht
End Sub

Report back, if problems.
Remember to back up you r file before trying ANYTHING NEW!!




"jamex" wrote in
message ...

How to print heading on everypage for all sheets of a workbook.
I grouped all sheets, then went as File-pagesetup-sheet tab, but i
see print titles option is disabled, why. But for single sheet it is
working. Please suggest how to enable it for *all sheets*.
THANKS


--
jamex
------------------------------------------------------------------------
jamex's Profile:
http://www.excelforum.com/member.php...o&userid=32243
View this thread: http://www.excelforum.com/showthread...hreadid=520432




tonywig

Print heading on everypage
 

I had the same problem and this sorted it - thanks Jim.


--
tonywig


------------------------------------------------------------------------
tonywig's Profile: http://www.excelforum.com/member.php...o&userid=18985
View this thread: http://www.excelforum.com/showthread...hreadid=520432



All times are GMT +1. The time now is 05:59 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com