M
Manu
Guest
Salut à tous,
voici mon code qui me pose problème car il me donne comme message d'erreur :else sans if
Je n'y comprends rien car j'ai bien mis mon if:
Si vous trouvez l'erreur, ça serait super:
Private Sub Worksheet_Activate()
Sheets("Feuil1").Select
If Range("B55").Value < 50 Then Range("B65").Value = 1
ElseIf (Range("B55").Value > 50 And Range("B55").Value < 100) Then Range("B65").Value = 2
ElseIf (Range("B55").Value > 100 And Range("B55").Value < 150) Then Range("B65").Value = 3
End If
End Sub
voici mon code qui me pose problème car il me donne comme message d'erreur :else sans if
Je n'y comprends rien car j'ai bien mis mon if:
Si vous trouvez l'erreur, ça serait super:
Private Sub Worksheet_Activate()
Sheets("Feuil1").Select
If Range("B55").Value < 50 Then Range("B65").Value = 1
ElseIf (Range("B55").Value > 50 And Range("B55").Value < 100) Then Range("B65").Value = 2
ElseIf (Range("B55").Value > 100 And Range("B55").Value < 150) Then Range("B65").Value = 3
End If
End Sub