Hur kör man automatiskt makro när cellformelresultatet ändras?

Om jag antar att jag har en lista med formler baserade på data i kolumn A och kolumn B som följande skärmdump visas, nu vill jag köra en specifik makrokod automatiskt när formelresultatet ändras med dess relativa celler ändras. Finns det någon bra idé att lösa det här jobbet i Excel?

Kör automatiskt makro när cellformelresultatet ändras med VBA-kod

Kör automatiskt makro när cellformelresultatet ändras med VBA-kod

Följande VBA-kod kan hjälpa dig att exekvera en specifik kod automatiskt när formelresultatcellen ändras, gör så här:

1. Högerklicka på arkfliken som du vill använda och välj sedan Visa kod från snabbmenyn, i den öppnade Microsoft Visual Basic för applikationer fönster, kopiera och klistra in följande kod i den tomma modulen:

VBA-kod: Kör automatiskt makro när cellformelresultatet ändras:

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

Anmärkningar: I ovanstående kod, C2: C8 är intervallet av formelceller som du vill använda,maco1 är namnet på makrot du vill köra automatiskt. Ändra det till ditt behov.

2. Spara och stäng sedan det här kodfönstret, nu, när data i intervallet A2:B8 ändras för att orsaka att formelresultatet ändras, utlöses din specifika makrokod på en gång.