Hi everyone!
I get this error 13 type mismatch, when running the following code:
"Worker" field is a combo box with multiple values allowed. I think this causes the problem.Code:Private Sub Report_Load() Dim con As Integer Dim noc1 As Integer con = Forms("PaperWork").Worker noc1 = DLookup("IDman", "Managers", "[IDman]=1") If con = noc1 Then Me.Text17 = "AGREE," & vbCrLf & "John Brown" End If End Sub
Any help, please?
Thx!