G Guest Feb 16, 2004 #1 Is it possible to copy a footer from one worksheet to all the worksheets in the same workbook?
F Frank Kabel Feb 16, 2004 #2 Hi one way (if you have defined the footer in the first sheet): - select all sheets - goto 'File - Pagesetup' - Hit 'OK' Also if you want to apply a footer to more than just one sheet, select all of them before going to the pagesetup dialog
Hi one way (if you have defined the footer in the first sheet): - select all sheets - goto 'File - Pagesetup' - Hit 'OK' Also if you want to apply a footer to more than just one sheet, select all of them before going to the pagesetup dialog
B Bob Phillips Feb 16, 2004 #3 You can use VBA to set the BeforePrint to print the same footer Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet .PageSetup.LeftFooter = "This is a standard footer" End With End Sub Put this in ThisWorkbook code module -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) Smoothe said: Is it possible to copy a footer from one worksheet to all the worksheets Click to expand... in the same workbook?
You can use VBA to set the BeforePrint to print the same footer Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet .PageSetup.LeftFooter = "This is a standard footer" End With End Sub Put this in ThisWorkbook code module -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) Smoothe said: Is it possible to copy a footer from one worksheet to all the worksheets Click to expand... in the same workbook?
