Bonjour à tous,

Novice en VBA, je vous sollicite car je suis bloqué.... j'essaye de créer un fichier qui utilise des formules si des cellules sont modifiées. Par exemple :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Not Application.Intersect(Target, Range("F:F")) Is Nothing Or Not Application.Intersect(Target, Range("E:E")) Is Nothing And Target.row > 11 Then
MsgBox "Je calcule le coût de l'agent"
End If
 
End sub
Cela fonctionne cependant via un bouton les colonnes E et F peuvent être changées, cela à pour conséquence de m'afficher deux fois ma MsgBox.
Moi je ne veux l'afficher qu'une fois.

Globalement:
Si E est changée alors MsgBox ; Si F est changée alors MsgBox ; Si F et E sont changées alors 1 seule MsgBox, non 2

Je ne sais pas si je suis clair ou si je me suis bien exprimé. Ce doit être simple mais je suis vraiment nul

Merci pour votre aide.