Bonjour
je voudrais que lorsque je met "21" dans la ligne c6 à NC6 il me lance ma userform(alerte.show)
merci
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("c6:nc6")) Is Nothing Then
If Target.Value = "21" Then alerte.Show
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("c6:nc11")) Is Nothing Then
Select Case Target.Value
Case Is = "21", "21ND", "10ND", "OHP", "FP", "33", "DE"
alerte.Show
End Select
End Sub
j'aime bien ta simplicité
Re..
En C12 tu peux utiliser ceci
=SI(OU(C$5="M";C$5="A";C$5="N");NB.VIDE(C$6:C$11);"")
Et tirer vers la droite
au lieu de
=SI(C5="M";NB.VIDE(C6:C11);SI(C5="A";NB.VIDE(C6:C11);SI(C5="N";NB.VIDE(C6:C11);"")))