Vba: eine einfache formel für „wenn zelle enthält“

Sie können die folgende grundlegende Syntax verwenden, um in VBA eine Formel für „Wenn Zelle enthält“ zu verwenden:

 Sub IfContains()
    Dim i As Integer

    For i = 2 To 8
        If InStr(1, LCase(Range(" A " & i)), " turtle ") <> 0 Then
        Result = " Contains Turtle "
        Else
        Result = “ Does Not Contain Turtle ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

In diesem speziellen Beispiel wird überprüft, ob jede Zelle im Bereich A2:A8 „Schildkröte“ enthält, und weist dann jeder passenden Zelle im Bereich B2:B8 „Enthält eine Schildkröte“ oder „Enthält keine Schildkröte“ zu.

Hinweis : Die Instr- Methode prüft, ob eine Zeichenfolge eine andere Zeichenfolge enthält, und die LCase- Methode wandelt den Text in Kleinbuchstaben um, um eine Suche ohne Berücksichtigung der Groß- und Kleinschreibung durchzuführen.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Verwendung von „Wenn Zelle enthält“ in VBA

Angenommen, wir haben die folgende Liste von Zellen in Excel, die jeweils unterschiedlichen Text enthalten:

Angenommen, wir möchten prüfen, ob jede Zelle im Bereich A2:A8 den Text „Schildkröte“ enthält, und die Ergebnisse in den entsprechenden Zellen im Bereich B2:B8 anzeigen.

Dazu können wir das folgende Makro erstellen:

 Sub IfContains()
    Dim i As Integer

    For i = 2 To 8
        If InStr(1, LCase(Range(" A " & i)), " turtle ") <> 0 Then
        Result = " Contains Turtle "
        Else
        Result = “ Does Not Contain Turtle ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Spalte B sagt uns, ob die entsprechenden Zellen in Spalte A irgendwo im Text „Schildkröte“ enthalten oder nicht.

Hinweis : Die vollständige Dokumentation für die VBA- Instr -Methode finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So zählen Sie das Vorkommen von Zeichen in einer Zeichenfolge
VBA: So überprüfen Sie, ob eine Zeichenfolge eine andere Zeichenfolge enthält