print author
is there any way to have the author of a workbook printed in the footer?
|
print author
A UDF and a macro will do the trick.
Sub Props_In_Footer() With ActiveSheet .PageSetup.CenterFooter = DocProps("last author") End With End Sub '=DOCPROPS("last author") 'or '=DOCPROPS("last save time") Function DocProps(prop As String) Application.Volatile On Error GoTo err_value DocProps = ActiveWorkbook.BuiltinDocumentProperties _ (prop) Exit Function err_value: DocProps = CVErr(xlErrValue) End Function Gord Dibben MS Excel MVP On Wed, 15 Mar 2006 18:21:06 -0000, "jiwolf" wrote: is there any way to have the author of a workbook printed in the footer? |
All times are GMT +1. The time now is 06:23 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com