Discussion :

[chito79000]

Bonjour,

je voulais savoir si cela est possible d'executer une macro si la valeur d'une cellule change
Par exemple de la cellule E2 à la dernière ligne, si on change le texte cela exécute une macro pour lancer un MsgBox....

J'ai réussi à mettre cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Sheets("feuil1").Range("Z20:AA30")) Is Nothing Then
     MsgBox ("le texte à indiquer")
    End If
End Sub

Le souci c'est qu'ici le MsgBox apparaît quand je clique sur la cellule alors que je voudrais quand le texte se modifie

[Mr Poulpe]

Bonjour,

Il faudrait utiliser l'événement change et non pas le selection change selon moi.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Worksheet_Change(ByVal Target As Range)

Bien cordialement,

Mr Poulpe

[chito79000]

J'ai trouvé la solution. merci quand meme