copy footer without copying page setup
Hello,
I have a workbook with many worksheets. The worksheets have different page layouts/setups. However, I need the same footer on all sheets. When I "select all sheets" and add a footer, the page setup copies throughout also. Is there a way to copy the footer without changing the page setup and without having to open every single footer to copy/paste? thanks Jen |
copy footer without copying page setup
Sub setfooter() For Each ws In Worksheets ws.PageSetup.LeftFooter = "SalesAidSoftware" Next End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "jen_writer" wrote in message ... Hello, I have a workbook with many worksheets. The worksheets have different page layouts/setups. However, I need the same footer on all sheets. When I "select all sheets" and add a footer, the page setup copies throughout also. Is there a way to copy the footer without changing the page setup and without having to open every single footer to copy/paste? thanks Jen |
copy footer without copying page setup
Try this small macro:
Sub commonfoot() For Each s In Worksheets s.Activate ActiveSheet.PageSetup.CenterFooter = "jen" Next End Sub -- Gary''s Student - gsnu200759 "jen_writer" wrote: Hello, I have a workbook with many worksheets. The worksheets have different page layouts/setups. However, I need the same footer on all sheets. When I "select all sheets" and add a footer, the page setup copies throughout also. Is there a way to copy the footer without changing the page setup and without having to open every single footer to copy/paste? thanks Jen |
All times are GMT +1. The time now is 10:12 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com