So vergleichen sie zeichenfolgen in vba: mit beispielen

Sie können in VBA die folgenden Methoden verwenden, um Zeichenfolgen zu vergleichen:

Methode 1: Vergleichen von Zeichenfolgen, bei denen die Groß-/Kleinschreibung beachtet wird

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i)) = 0
    Next i
End Sub

Dieses Makro führt einen Zeichenfolgenvergleich unter Berücksichtigung der Groß- und Kleinschreibung zwischen Zeichenfolgen in übereinstimmenden Zellen in den Bereichen A2:A10 und B2:B10 durch und gibt im Bereich C2:C10 TRUE oder FALSE zurück, um anzuzeigen, ob die Zeichenfolgen gleich sind oder nicht.

Methode 2: Zeichenfolgenvergleich ohne Berücksichtigung der Groß-/Kleinschreibung

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i), vbTextCompare) = 0
    Next i
End Sub

Dieses Makro führt einen Zeichenfolgenvergleich ohne Berücksichtigung der Groß- und Kleinschreibung zwischen Zeichenfolgen in übereinstimmenden Zellen in den Bereichen A2:A10 und B2:B10 durch.

Die folgenden Beispiele zeigen, wie jede Methode in der Praxis mit den folgenden Zeichenfolgenlisten in Excel verwendet wird:

Beispiel 1: Vergleich von Zeichenfolgen mit Berücksichtigung der Groß-/Kleinschreibung in VBA

Wir können das folgende Makro erstellen, um einen Zeichenfolgenvergleich unter Berücksichtigung der Groß-/Kleinschreibung zwischen jeder übereinstimmenden Zeichenfolge in den Spalten A und B durchzuführen:

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i)) = 0
    Next i
End Sub

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

Spalte C gibt TRUE zurück, wenn die Zeichenfolgen gleich sind und die gleiche Groß-/Kleinschreibung haben.

Andernfalls gibt Spalte C FALSE zurück.

Beispiel 2: Vergleich von Zeichenfolgen ohne Berücksichtigung der Groß-/Kleinschreibung in VBA

Wir können das folgende Makro erstellen, um einen Zeichenfolgenvergleich ohne Berücksichtigung der Groß- und Kleinschreibung zwischen den einzelnen übereinstimmenden Zeichenfolgen in den Spalten A und B durchzuführen:

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i), vbTextCompare) = 0
    Next i
End Sub

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

Spalte C gibt TRUE zurück, wenn die Zeichenfolgen gleich sind, unabhängig von der Groß-/Kleinschreibung.

Spalte C gibt nur dann FALSE zurück, wenn die Zeichenfolgen nicht gleich sind.

Hinweis : Die vollständige Dokumentation der StrComp- Funktion in VBA 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 ersetzen Sie Zeichen in einer Zeichenfolge
VBA: So entfernen Sie Sonderzeichen aus einer Zeichenfolge
VBA: So konvertieren Sie einen String in int