XL 2019 création de code

[Cyr39]

Voici la macro que j'aimerais avoir... après de multiples essais je fais choux blanc Après modification dans la cellule de la ligne active en colonne 14,22,30,36,42,48,54,62,68,74,80,86 on doit vérifier si la valeur 2 est présent dans la colonne 135 de la ligne active.
si oui msgbox"toto" sinon rien.
merci

 

[Jacky67]

Voici la macro que j'aimerais avoir... après de multiples essais je fais choux blanc Après modification dans la cellule de la ligne active en colonne 14,22,30,36,42,48,54,62,68,74,80,86 on doit vérifier si la valeur 2 est présent dans la colonne 135 de la ligne active.
si oui msgbox"toto" sinon rien.
merci

Bonjour,
Quelque chose comme ceci dans le module de la feuille en question, peut-être

Private Sub Worksheet_Change(ByVal Target As Range)
    Select Case Target.Column
    Case 14, 22, 30, 36, 42, 48, 54, 62, 68, 74, 80, 86
        If Cells(Target.Row, 135) = 2 Then MsgBox "toto", , "Hello"
    End Select
End Sub