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