Evenement worksheets changement de valeur d'une formule

Bonjour à toutes et à tous,

Je cherche un événement de feuille qui permet de détecter un changement de valeur d'une cellule par rapport à une formule.

Mon but est que j'ai une formule Sous.total NBVAL qui calcule le nombre de résultat suite à un filtre, et j'aimerai qu'un événement se déclenche lorsque le valeur du sous-total change.

Exemple :

Worksheet_Change_cell_value

If Range("B2").value <> "2000" Then

'suite du code

End if

D'avance merci

Bonjour Vincent, bonjour le forum,

Regarde l'événementielle Calculate :

Private Sub Worksheet_Calculate()

End Sub

Bonjour ThauThème,

merci pour ta réponse.

Par contre le worksheet calculate impacte toutes les feuilles...

Ce qui veut dire que même si la feuille où il y a la condition n'est pas la feuille active, le code va se déclencher..

Private Sub Worksheet_Calculate()

If Sheets("Modifier - Aperçu des ordres p").Range("J1").Value <> "647" Then

ActiveWindow.ScrollRow = 1

MsgBox ("Scroll effectué" & Sheets("Modifier - Aperçu des ordres p").Range("J1").Value)

End If

End Sub

Je suis sur une autre feuille que "Modifier - Aperçu des ordres p", mais vu que la condition n'est pas respecté ma macro se déclenche sur l'autre feuille...

Il n'y aurait pas une solution pour ça ?