Retrieving User of Last Save
Ruan,
Try
ActiveWorkbook.BuiltinDocumentProperties("Last Author")
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"Ruan" wrote in message
...
Hello,
I would like to the User of the Last Save displayed in Cell A10014. At
this
time I have the Author, which is incorrect.
The below code is in "This Workbook" code module
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
[Billing!A1012] =
ActiveWorkbook.BuiltinDocumentProperties("Subject" ).Value
[Billing!A1013] = Now()
[Billing!A1014] = ActiveWorkbook.Author
End Sub
Thanks
Ruan
|