SaveData Field
 

Is it possible to insert a SaveDate field in an Excel worksheet footer?
--
PCGrammy

Not really. The best you can do is to use a VBA procedure to
enter the property value. In the ThisWorkbook code module, use
code like the following:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Me.Worksheets("Sheet1").PageSetup.CenterFooter = _
Me.BuiltinDocumentProperties("Last Save Time").Value
End Sub



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


"PCGrammy" wrote in message
...
Is it possible to insert a SaveDate field in an Excel worksheet
footer?
--
PCGrammy

Note: If you use Excel 97 this Property will not update
See http://www.rondebruin.nl/print.htm#Saved

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Chip Pearson" wrote in message ...
Not really. The best you can do is to use a VBA procedure to enter the property value. In the ThisWorkbook code module, use code
like the following:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Me.Worksheets("Sheet1").PageSetup.CenterFooter = _
Me.BuiltinDocumentProperties("Last Save Time").Value
End Sub



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


"PCGrammy" wrote in message ...
Is it possible to insert a SaveDate field in an Excel worksheet footer?
--
PCGrammy