C Chip Pearson May 20, 2005 #2 Not directly. You can use the BeforePrint event to add the value to the footer. E.g., in the ThisWorkbook code module, Private Sub Workbook_BeforePrint(Cancel As Boolean) Worksheets("Sheet1").PageSetup.CenterFooter = _ Range("A1").Value End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com
Not directly. You can use the BeforePrint event to add the value to the footer. E.g., in the ThisWorkbook code module, Private Sub Workbook_BeforePrint(Cancel As Boolean) Worksheets("Sheet1").PageSetup.CenterFooter = _ Range("A1").Value End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com
