You need VBA to do this. In the ThisWorkbook code module, use
code like the following:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = Range("A1").Text
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Big Rick" wrote in message
...
As I have heard different stories of wether it is possible to
put the
contents of a cell into a custom footer, please can someone
tell me if it is
possible or not.
The cell contents simply contains text.

Thanking you in anticipation
<<<<<<
Big Rick