Forum Discussion

Copper Contributor

Jun 01, 2017

Macro to update Footers on multiple worksheets

Hi Is there anyone out there who can help with this? I'm creating a workbook for others to use, so I am aiming to include as much automation as possible. I need to update 50 sheets, all i...

Macros & VBA

Need Help

Wyn Hopkins

MVP

Jun 01, 2017

Hi Keith

This is the basic code

Sub RenameFooters()
Dim wks As Worksheet

For Each wks In Worksheets

   wks.PageSetup.LeftFooter = Range("FooterText").Value

' note you can use .CenterFooter or . RightFooter

Next wks

End Sub

Keith Farmery

Copper Contributor

Jun 05, 2017

Hi Wyn

That's great - thank you - your help is much appreciated.

I'm going to use both methods

Thanks again

Keith

Wyn Hopkins
MVP
Jun 05, 2017
No problem, would you mind marking it as answered

Thanks