Forum Discussion
Excel 365 - Header, Footer, and Print area
I have an Excel workbook with 20 tabs. Each tab has a different header except the date after the description of the particular sheet. I need every sheet to have a footer with a page number starti...
Run this macro:
Sub SetPageNumbers()
Dim wsh As Worksheet
Application.PrintCommunication = False
For Each wsh In Worksheets
With wsh.PageSetup
.FirstPageNumber = 2
.CenterFooter = "&P"
End With
Next wsh
Application.PrintCommunication = True
End SubThank you, but that did not work.
In what way did it fail?
