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...
| +236 | UBS Healthcare | 49 | 12h |
| +69 | UBS MDs Treat Employees like Dogshit, Data to Prove it | 11 | 4h |
| +62 | Shana tova - happy new year | 12 | 5h |
| +59 | More diversity needed in the industry | 11 | 2d |
| +48 | NYC Wall Street Run Club | 13 | 2d |
| +35 | Lost all ambition / don’t care at all anymore | 14 | 36m |
| +24 | What is the role of an analyst at your firm? | 3 | 4h |
| +21 | Feeling a bad pattern forming. I need some help | 3 | 4d |
| +19 | Reaching out to interviewer who rejected me | 2 | 3d |
| +18 | "Don't include firm in Cover Letter's file name" | 9 | 53m |
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.
Autem error vero velit rem distinctio quibusdam molestias. Laudantium sed similique et voluptatum praesentium. Iure nostrum ut eos quisquam officia dignissimos.
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...