Apply footer code to all new workbooks

  • Thread starter Thread starter Billy Rogers
  • Start date Start date
B

Billy Rogers

How can I have this apply automatically to all new workbooks? I
tried putting this in the Personal.xls BeforeSave event but it didn't
work on new workbooks.





For Each wksht In Excel.Sheets

wksht.PageSetup.CenterFooter = "Created by Billy Rogers &D"

Next wksht
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Auto footers on multiple pages 5
Runtime error 57121 5
exclusion list in code 2
variable not set error? 4
How to apply a macro to all workbooks 2
This should fry your squash, it did mine 1
sub to create a sub 1
Find and Copy 2

Back
Top