Salut ngohsom,
Je pense qu'avec une macro évenementielle (a placer dans le module de feuille adéquate), tu devrais réussir a t'en sortir :
Citation :
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1" )) Is Nothing Then Exit Sub
'ton code pour ta procédure
End Sub
|
Si tu veux d'autres explications, n'hesite pas,
@+