Wie wird ein Makro automatisch ausgeführt, wenn sich das Ergebnis der Zellformel ändert?
Angenommen, ich habe eine Liste von Formeln, die auf den Daten in Spalte A und Spalte B basieren, wie im folgenden Screenshot gezeigt. Jetzt möchte ich einen bestimmten Makrocode automatisch ausführen, wenn sich das Formelergebnis mit den relativen Zellen ändert. Gibt es eine gute Idee, diesen Job in Excel zu lösen?
Führen Sie das Makro automatisch aus, wenn sich das Ergebnis der Zellformel mit dem VBA-Code ändert
Führen Sie das Makro automatisch aus, wenn sich das Ergebnis der Zellformel mit dem VBA-Code ändert
Der folgende VBA-Code kann Ihnen helfen, einen bestimmten Code automatisch auszuführen, wenn sich die Ergebniszelle der Formel ändert. Gehen Sie dazu folgendermaßen vor:
1. Klicken Sie mit der rechten Maustaste auf die Registerkarte Blatt, die Sie verwenden möchten, und wählen Sie dann Code anzeigen aus dem Kontextmenü in der geöffneten Microsoft Visual Basic für Anwendungen Kopieren Sie im Fenster den folgenden Code und fügen Sie ihn in das leere Modul ein:
VBA-Code: Makro automatisch ausführen, wenn sich das Ergebnis der Zellformel ändert:
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
Note: Im obigen Code, C2: C8 ist der Bereich der Formelzellen, die Sie verwenden möchten ,maco1 ist der Name des Makros, das Sie automatisch ausführen möchten. Bitte ändern Sie es nach Ihren Wünschen.
2. Speichern und schließen Sie dann dieses Codefenster. Wenn sich die Daten im Bereich A2: B8 ändern und das Ergebnis der Formel ändert, wird Ihr spezifischer Makrocode sofort ausgelöst.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!