Hi,
I have a userform that completes various functions and updates cells when a single button is clicked. Can I add code to the the end to enable a cell to be updated with the time and date, say cell A1 for example?
Also is it possible to have the (Windows) username in another cell (all users will be unique) so it will save Jo Bloggs for example?
I know this is possible as a Worksheet function:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Sheets("PACT").Range("A343").Value = ThisWorkbook.BuiltinDocumentProperties("Last Save Time") Range("E343").Value = Environ("UserName") End Sub
Thanks in advance,
JP
Bookmarks