exécution automatique d'une macro

Bonsoir Corinne, le Forum

Voici un exemple de code à mettre dans le Private Module de la Feuille en question :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then
MsgBox "La Valeur de la cellule A1 à changée"
End If
End Sub


Bonne Soirée
@+Thierry

merci cela marche

bonne soirée

corinne