Get application user name
Private Sub CommandButton1_Click() MsgBox "Hello " & Application.UserName End Sub