Sheets("Mai").Select
For i = 1 To 3
If Cells(5 + i, 2) Like "*Nomx*" Then
Cells(5 + i, 8) = 1
ElseIf Cells(5 + i, 2) Like "*Nom1*" Or Cells(5 + i, 2) Like "* Nom2*" Or Cells(5 + i, 2) Like "*Nom3*" Then
ElseIf Cells(5 + i, 2) Like Then
Cells(5 + i, 11) = 1
Else
End If
Next i