Type Info:
FullName As String
Dim FullName As String FullName = Application.User.FullName MsgBox "You're full name is " & FullName