Contrôle sur une cellule

[nougitch]

Bonjour,

Est-il possible de contrôler la modification d'une cellule ?
Pour faire simple, je souhaite que si la valeur de ma cellule = 1, rien, mais si je la passe à 2, alors Msgbox.

Merci par avance pour votre aide !

 

[excalibur]

Re : Contrôle sur une cellule

bonjour nougitch le forum
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
If Selection = 2 Then MsgBox "ton message"
End If
End Sub
a mettre dans l evenement de ta feuille

 

[nougitch]

Re : Contrôle sur une cellule

Merci bcp Excalibur ! C'est parfait !