Hoe een macro automatisch uitvoeren wanneer het resultaat van een cel formule verandert?

Stel dat ik een lijst met formules heb die gebaseerd zijn op de gegevens in kolom A en kolom B, zoals in de volgende schermafbeelding te zien is. Nu wil ik een specifieke macrocode automatisch uitvoeren wanneer het resultaat van de formule verandert door wijzigingen in de bijbehorende cellen. Is er een goede manier om dit in Excel te doen?

Macro automatisch uitvoeren wanneer het resultaat van een cel formule verandert met VBA-code

Macro automatisch uitvoeren wanneer het resultaat van een cel formule verandert met VBA-code

De volgende VBA-code kan u helpen om een specifieke code automatisch uit te voeren wanneer de cel met het formuleresultaat verandert, doe het als volgt:

1. Klik met de rechtermuisknop op het tabblad van het werkblad dat u wilt gebruiken en kies vervolgens Weergave Code uit het contextmenu. In het geopende Microsoft Visual Basic for Applications-venster kopieert en plakt u de volgende code in de lege Module:

VBA-code: Macro automatisch uitvoeren wanneer het resultaat van een cel formule verandert:

Private Sub Worksheet_Calculate()
'Updateby Extendoffice
    Dim Xrg As Range
    Set Xrg = Range("C2:C8")
    If Not Intersect(Xrg, Range("C2:C8")) Is Nothing Then
    Macro1
    End If
End Sub

Opmerking: In de bovenstaande code is C2:C8 het bereik van de formulecellen dat u wilt gebruiken, maco1 is de naam van de macro die u automatisch wilt uitvoeren. Pas dit aan naar uw behoefte.

2. Sla daarna deze codevenster op en sluit het. Nu wordt uw specifieke macrocode onmiddellijk geactiveerd wanneer de gegevens in het bereik A2:B8 veranderen, wat leidt tot wijzigingen in het formuleresultaat.