If [L1] = 0 _
And [M1] < 2 _
And [Q1] = "541" Then
MsgBox "OK"
ElseIf [L1] = 0 _
And [M1] < 2 _
And [Q1] = "631" Then
MsgBox "OK"
ElseIf [L1] = 0 _
And [M1] < 2 _
And [Q1] = "640" Then
MsgBox "OK"
ElseIf [L1] = 0 _
And [M1] < 2 _
And [Q1] = "721" Then
MsgBox "OK"
ElseIf [L1] = 0 _
And [M1] < 2 _
And [Q1] = "730" Then
MsgBox "OK"
ElseIf [L1] = 0 _
And [M1] < 2 _
And [Q1] = "820" Then
MsgBox "OK"
Else
MsgBox "PAS OK"
End If