Wie führt man ein Makro basierend auf einem Zellenwert in Excel aus?

Angenommen, ich habe mehrere Makrocodes in meiner Arbeitsmappe, und jetzt möchte ich diese Codes basierend auf dem Zellenwert ausführen. In diesem Artikel werde ich über verschiedene Situationen sprechen, denen Sie bei der täglichen Arbeit mit Excel möglicherweise begegnen.

Makro ausführen oder auslösen, wenn der Zellenwert größer oder kleiner als ein bestimmter Wert ist, mit VBA-Code

Makro ausführen oder auslösen, wenn der Zellenwert einem bestimmten Text entspricht, mit VBA-Code

Makro ausführen oder auslösen, wenn der Zellenwert größer oder kleiner als ein bestimmter Wert ist, mit VBA-Code

Zum Beispiel: Wenn der Wert in Zelle A1 zwischen 10 und 50 liegt, führen Sie Makro1 aus, und wenn der Wert größer als 50 ist, führen Sie Makro2 aus. Um dieses Problem in Excel zu lösen, wenden Sie bitte den folgenden VBA-Code an.

1. Klicken Sie mit der rechten Maustaste auf das Blattregister, für das Sie das Makro basierend auf einem Zellenwert ausführen möchten, und wählen Sie dann Ansicht Code aus dem Kontextmenü aus. Im geöffneten Fenster Microsoft Visual Basic for Applications kopieren und fügen Sie den folgenden Code in das leere Modul ein:

VBA-Code: Makro ausführen, wenn Zellenwert größer oder kleiner als:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 10 To 50: Macro1
        Case Is > 50: Macro2
        End Select
    End If
End Sub

Hinweis: Im obigen Code:

A1 ist die Zelle, die den spezifischen Wert enthält, auf dessen Basis Sie das Makro ausführen möchten;

Fall 10 bis 50: Makro1: Das bedeutet, wenn der Wert zwischen 10 und 50 liegt, wird Makro1 ausgeführt;

Fall Ist > 50: Makro2: Das bedeutet, wenn der Wert größer als 50 ist, wird Makro2 ausgeführt.

Bitte ändern Sie diese Makronamen und Kriterien entsprechend Ihren Bedürfnissen, und Sie können auch weitere Kriterien nach dem Fall-Skript hinzufügen.

2. Speichern Sie dann diesen Code und schließen Sie das Fenster. Jetzt wird Makro1 ausgelöst, wenn der eingegebene Wert zwischen 10 und 50 in Zelle A1 liegt, und wenn der eingegebene Wert größer als 50 ist, wird Makro2 ausgeführt.

Entfesseln Sie die Magie von Excel mit Kutools AI

• Intelligente Ausführung: Führen Sie Zellenoperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles angetrieben durch einfache Befehle.
• Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe zu optimieren.
• VBA-Codierung: Schreiben und implementieren Sie VBA-Code mühelos.
• Formelinterpretation: Verstehen Sie komplexe Formeln mit Leichtigkeit.
• Textübersetzung: Überwinden Sie Sprachbarrieren in Ihren Tabellen.

Erweitern Sie Ihre Excel-Fähigkeiten mit KI-gestützten Tools. Laden Sie jetzt herunter und erleben Sie eine Effizienz wie nie zuvor!

Makro ausführen oder auslösen, wenn der Zellenwert einem bestimmten Text entspricht, mit VBA-Code

Wenn Sie das Makro basierend auf einem bestimmten Text in einer Zelle auslösen möchten, zum Beispiel Makro1 ausführen, wenn der Text „Löschen“ eingegeben wird, und Makro2 ausführen, wenn der Text „Einfügen“ eingegeben wird. Der folgende Code kann Ihnen helfen.

1. Klicken Sie mit der rechten Maustaste auf das Blatt, für das Sie das Makro basierend auf dem Zellenwert ausführen möchten, und wählen Sie dann Ansicht Code aus dem Kontextmenü aus. Im geöffneten Fenster Microsoft Visual Basic for Applications kopieren und fügen Sie den folgenden Code in das leere Modul ein:

VBA-Code: Makro ausführen, wenn Zellenwert einem bestimmten Text entspricht

Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
 Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub 

Hinweis: Im obigen Code sind „Löschen“ und „Einfügen“ die Zelltexte, auf deren Basis Sie Makros ausführen möchten, und Makro1 und Makro2 sind die Makros, die Sie basierend auf dem Text ausführen möchten. Bitte ändern Sie sie entsprechend Ihren Bedürfnissen.

2. Speichern Sie dann diesen Code und schließen Sie das Fenster. Jetzt wird Makro1 ausgelöst, wenn Sie den Text „Löschen“ in Zelle A1 eingeben, und wenn der Text „Einfügen“ eingegeben wird, wird Makro2 ausgeführt.

Verwandte Artikel:

Wie führt man ein Makro aus, wenn sich der Zellenwert in Excel ändert?

Wie führt man ein Makro automatisch vor dem Drucken in Excel aus?

Wie führt man ein Makro basierend auf einem Wert aus, der aus einer Dropdown-Liste in Excel ausgewählt wurde?

Wie führt man ein Makro durch Anklicken von Hyperlinks in Excel aus?

Wie führt man ein Makro aus, wenn ein Blatt aus einer Arbeitsmappe ausgewählt wird?