Activation de macro

Michel C

XLDnaute Nouveau
Bonjour à tous,

J'ai les codes suivants dans une feuille :
Sub Macro1()
Range("M17").GoalSeek Goal:=0, ChangingCell:=Range("B3")
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("m17")) Is Nothing Then
Macro1
End If
End Sub

Celles-ci fonctionnent bien à condition que je change moi-même la valeur dans la cellule M17.

Cependant, si je met une formule dans la cellule M17, cette dernière change de valeur mais n'active pas la macro.

Quelles sont les modifs que je dois apporter aux macros?

En vous remerciant,

Michel
 

Discussions similaires

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T