Probème avec des macro événementielle

[chasseur44]

SAlut à tous
J'ai besoin d'un coup de main car je tourne en rond avec mon problème qui me parait simple !!! enfin j'en suis pas si sur !
Je penses que la PJ est suffisante pour comprendre
Merci à vous tous

 

[youky(BJ)]

Re : Probème avec des macro événementielle

Salut,
cela doit faire

A+

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$D$6" Then [C12] = [D6]: [E12] = ""
If Target.Address = "$C$12" Then [E12] = [D6] - [C12]
If Target.Address = "$E$12" Then [C12] = [D6] - [E12]
Application.EnableEvents = True
End Sub

 

[skoobi]

Re : Probème avec des macro événementielle

Bonjour,

voici:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$D$6" Then
[C12].Value = [D6].Value
ElseIf Target.Address = "$E$12" Then
[C12].Value = [D6].Value - [E12].Value
ElseIf Target.Address = "$C$12" Then
[E12].Value = [D6].Value - [C12].Value
End If
Application.EnableEvents = True
End Sub

 

[chasseur44]

Re : Probème avec des macro événementielle

MERCI à tous les deux 🙂
C'est parfait