Forum Discussion

Fran_Burnard's avatar
Fran_Burnard
Copper Contributor
Aug 03, 2021
Solved

headers

how to insert same header in each page in a workbook
  • NikolinoDE's avatar
    Aug 03, 2021

    Fran_Burnard 

     

    Way 1 (w/out VBA):

    You can select multiple worksheets with Ctrl+Left-click. When multiple worksheets are selected, [Group] appears in the title bar at the top of the worksheet. To cancel a selection of multiple worksheets in a workbook, click any unselected worksheet. If no unselected sheet is visible, right-click the tab of a selected sheet, and then click Ungroup Sheets.

    Basically, if you select all worksheets and then define the headers via File - Page Setup, this header applies to all worksheets.

     

    Way 2 (with VBA)

     

     

    Option Explicit
    Sub Header_Choice()
    Dim sh As Object
    For Each sh In ActiveWindow.SelectedSheets
      sh.PageSetup.RightHeader = "NiKoLiNo"
    Next
    End Sub

     

     

     

    I would be happy to know if I could help.

     

    Nikolino

    I know I don't know anything (Socrates)

     

    * Kindly Mark and Vote any reply if it helps please, as it will be beneficial to more Community members reading here.

     

Resources