Msgbox sous condition

[adi399]

Bonjour à tous,

Vous allez me dire que le sujet à déjà été créer ! je sais, mais je n'arrive pas à adapter le code à mon classeur

Je voudrais lorsque je sélectionne NOK dans ma liste déroulante, un msgbox s'affiche à l'écran!



Merci d'avance en tous cas!

 

[JNP]

Re : Msgbox sous condition

Bonjour adi399 ,

Vous allez me dire que le sujet à déjà été créer ! je sais,...

Non, tu crois ?...

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$3" And Target = "NOK" Then MsgBox "Alerte", vbCritical + vbOKOnly, "ATTENTION !"
End Sub

Bonne suite

 

[adi399]

Re : Msgbox sous condition

MERCI beaucoup!!!

 

[Tatiana29]

Re : Msgbox sous condition

Ceci est une solution mais je peux t'en proposer une autre plus fiable et plus sécurisée que celle de JNP car si tu ajoutes une ligne entre la ligne 1 et 3 je ne suis pas sur que cette formule marche toujours!

 

[JNP]

Re : Msgbox sous condition

Re ,

une autre plus fiable et plus sécurisée que celle de JNP car si tu ajoutes une ligne entre la ligne 1 et 3 je ne suis pas sur que cette formule marche toujours!

Effectivement, j'ai bien analysé ton code .
Mais il y a aussi une solution pour sécuriser le test dans ma solution, voir la PJ .
Bonne suite et bises à Tatiana