I have tried several ways of doing this and can not get it to work. Here is the If statement:
I originally had it with out the End If and got an error of saying I need the end if. So I added it now the if statement will not work. It throws the message box everytime.
Do I need to do this as SELECT CASE????
Can someone please help me.
Code:
If (Me.ComponentCode = "KM") And (CurrentUser() <> "user1") Or (CurrentUser() <> "user2") Or (CurrentUser() <> "user3") Or (CurrentUser() <> "user4") Then _
MsgBox "You are not authorized to enter this claim. Please take it to MCRATS."
Me.tblClaims_SSN.SetFocus
End If
I originally had it with out the End If and got an error of saying I need the end if. So I added it now the if statement will not work. It throws the message box everytime.
Do I need to do this as SELECT CASE????
Can someone please help me.
Last edited: