Fellow Monkeys -- I hope some of you can help me out.
After adding countless items into the data room for an acquirer, our clients management team decided they wanted to have a specific header and footer in each excel file.
Is there a way to add headers/footers across multiple workbooks? I'd like to streamline this process a little. Also, opening hundreds of files for no real reason sounds awful. Hope there is an answer...
| +286 | UBS Tech MD hires Son (from no-name college) as an Intern | 49 | 17h |
| +166 | WTF IS THIS COMPETITON | 59 | 1d |
| +124 | Is banking in the south more sustainable? | 29 | 12h |
| +101 | The Intern Starter Pack | 17 | 4h |
| +76 | Current State of the League Tables | 28 | 1d |
| +66 | [Official] 2026 IB Analyst Bonus Megathread (with 2025 Consolidated Pay and Perks/Benefits) | 11 | 9h |
| +51 | Perella Weinberg to Cut 10% of Workforce, Including Partners | 33 | 5h |
| +40 | UBS Groups Ranked by Future Outlook | 20 | 2d |
| +34 | Are all Tech / TMT groups sweaty? | 18 | 1h |
| +32 | PWP Layoffs????? | 18 | 4d |
Career Resources
Get instant access to lessons taught by experienced private equity pros and bulge bracket investment bankers including financial statement modeling, DCF, M&A, LBO, Comps and Excel Modeling.
How many workbooks is it?
You can group the sheets and apply the header and footer automatically, just remember to ungroup the sheets before you save.
Do you know vba? I am guessing there is a way to batch automate it if everything is in the same folder but I haven't done it before.
Its roughly 400 files.
I am starting to teach myself VBA but don't know it well enough yet.
Try following these, there is no summary I can type that will be more useful than a video.
https://www.youtube.com/watch?v=9tOOa1ll3bEIf you don't mind clicking 400 files and the videos didn't work, this could work.
Lets try a test, Make a new folder for me and copy a small number of workbooks to it. Then change the header and footer in one active book and run this;
"Sub CopyHeaderFooter() Dim PS As PageSetup, WB As Workbook, WS As Worksheet Set PS = ActiveSheet.PageSetup For Each WB In Workbooks For Each WS In WB.Worksheets With WS.PageSetup .LeftHeader = PS.LeftHeader .CenterHeader = PS.CenterHeader .RightHeader = PS.RightHeader .LeftFooter = PS.LeftFooter .CenterFooter = PS.CenterFooter .RightFooter = PS.RightFooter End With Next Next End Sub"
You better quote this to get the spacing right just in case I didn't do it correctly.
Thank you for the insight! I will work on my VBA skills. For this task, I sucked it up and...had an intern do it.
Someone should make a plug-in for this though, I feel like it could be pretty useful.
Nostrum rem at maiores magni quia odio repudiandae. Ut ratione iure quibusdam assumenda nemo praesentium. Nisi corporis sunt quod et nihil sint et.
See All Comments - 100% Free
WSO depends on everyone being able to pitch in when they know something. Unlock with your email and get bonus: 6 financial modeling lessons free ($199 value)
or Unlock with your social account...