Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.
Private Sub boxUserManStats_Click() Dim intCancel As Integer DoCmd.OpenReport "rptUserManStats", acViewPreview, , "tblProductionData.Division = 'EDS' AND " & _ "tblProductionData.DataSource = 'EDSManual' AND " & _ "tblProductionData.UserID = '" & Me.txtUserID & "' AND " & _ "tblProductionData.ActivityDate = [Enter Date in format of M/D/YYYY] " Exit_ErrorHandler: Exit Sub ErrorHandler: If Err.Number = 2501 Then Exit Sub Else MsgBox Err.Number & ": " & Err.Description Resume Exit_ErrorHandler End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.