Add a cell reference to a page footer
In Excel 2003, I would like to add a cell reference to my page footer. Users
could then change the data via the worksheet and not have to go into page setup. Is this possible? |
Add a cell reference to a page footer
Sub CellInFooter()
With ActiveSheet .PageSetup.CenterFooter = .Range("A1").Value End With End Sub Assign to a button or shortcut key combo. Alternative..........You may want to place this into a BeforePrint event Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet .PageSetup.CenterFooter = .Range("A1").Value End With End Sub Gord Dibben MS Excel MVP On Tue, 12 Aug 2008 13:27:21 -0700, scheduling wrote: In Excel 2003, I would like to add a cell reference to my page footer. Users could then change the data via the worksheet and not have to go into page setup. Is this possible? |
All times are GMT +1. The time now is 12:30 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com