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




"M Z J R" <M Z J wrote in message
...
can i put a page subtotal in a footer...