The following example retrieves and displays the user ID for the user currently logged into Microsoft Dynamics GP.
Private Sub UserID_Click() Dim UserInfoObj As UserInfo Dim UserID As String 'Get the UserInfo object Set UserInfoObj = VbaGlobal.UserInfoGet() 'Retrieve and display the user ID UserID = UserInfoObj.UserID MsgBox UserID End Sub