UserName
This property contains the user logged in that experienced the error.
Group: System Error
Syntax: sName = SysErr.UserName
sName (String) is the user name of the device when the error occurred
Example:
Dim sUser As String
sUser = SysErr.UserName