En C3 possibilité de choisir "OUI" ou "NON" dans une liste déroulante
Sauf si B3 = 5 car dans ce cas doit nécessairement s'afficher en C3 "OUI" sans possibilité de choisir dans la liste déroulante (pas de possibilité de choisir "NON")
Mais il faut obligatoirement que la valeur de C3 soit "OUI" si B3 = 5 et rendre alors impossible la valeur "NON"
En effet avec ta solution par exemple :
- Je saisis "1" en B3 puis je choisis dans la liste déroulante "NON" en C3
- Puis je choisis "5" en B3, C3 reste à "NON" alors qu'il faudrait que la valeur en C3 passe automatiquement à "OUI" (sans avoir à choisir dans une liste déroulante)
Private Sub Worksheet_Change(ByVal R As Range)
If R.Address = [B3].Address Then
R(1, 2).Validation.Delete
If R = 5 Then
R(1, 2) = "OUI"
Else
With R(1, 2)
.Validation.Add 3, 1, 1, "=liste"
.Value = "": .Select
End With
End If
End If
End Sub