View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
lemorse lemorse is offline
external usenet poster
 
Posts: 5
Default howto put the same header on all worksheets of workbook

Thank you to all that replied. I have tried the suggestions and they work
great. I am embarrassed that I couldn't figure it out myself. This is the
first time I have used this forum, always used USENET before, and it has
worked great. Thank you so much.

"Gord Dibben" wrote:

Right-click on a sheet tab and "Select all sheets"

Set up the header on active sheet and will be done to all.

This can lead to some problems if you want other print settings different
for each sheet.

I would tend to use a macro so other print settings do not get altered.

Sub AllHeaders()
Dim WS As Worksheet
For Each WS In ActiveWorkbook.Sheets
WS.PageSetup.CenterHeader = "&""Algerian,Regular""&16" _
& "This is my header text"
Next
End Sub


Gord Dibben MS Excel MVP


On Sat, 19 Sep 2009 11:04:02 -0700, lemorse
wrote:

I wish to put the same header on all sheets of a workbook. I have checked
the help resources but could not find anything. Can anyone help me.
Thanks in advance.