VBA StrComp Funktion

In unserer Arbeit führen wir normalerweise jedes Mal Vergleiche durch. Diese Vergleiche können sich auf Zahlentexte oder irgendeine Art von Daten beziehen. Bei Zahlen wissen wir bereits, wie wir einen Vergleich anstellen. Dafür gibt es viele mathematische Methoden. Aber wie vergleichen wir zwei Saiten, welches Ergebnis erhalten wir? STRCOMP in VBA ist eine String-Vergleichsfunktion. Es vergleicht zwei Zeichenfolgen miteinander und gibt uns das Ergebnis. Das Ergebnis des Vergleichs ist jedoch nicht wahr oder falsch. Es gibt drei Möglichkeiten, um zwei Zeichenfolgen in der STRCOMP-Funktion zu vergleichen. Bevor wir uns damit befassen, sehen wir uns die Syntax für diese Funktion an.

Syntax von StrComp in Excel VBA

Die Syntax für die VBA StrComp-Funktion in Excel lautet wie folgt:

String 1 ist der String, der mit String 2 verglichen wird. Die Vergleichsmethoden sind für diese Funktion optional. Gehen wir nun zu den Vergleichsmethoden in dieser Funktion. In dieser Funktion gibt es drei Arten von Vergleichsmethoden:

  1. VbBinaryCompare: Dies ist standardmäßig eine Vergleichsmethode, wenn wir für unsere Funktion keine Vergleichsmethode auswählen. Bei dieser Vergleichsmethode wird zwischen Groß- und Kleinschreibung unterschieden. Wenn also Zeichenfolge 1 und Zeichenfolge 2 identisch sind, Zeichenfolge 1 jedoch in Kleinbuchstaben und Zeichenfolge 2 in Großbuchstaben geschrieben ist, sind beide nicht ähnlich. Der Binärcode für "a" und "A" ist unterschiedlich. Ähnliches gilt für andere Charaktere. Diese Codes werden als ASCII-Codes bezeichnet.
  2. VbTextCompare: Bei dieser Vergleichsmethode wird nicht zwischen Groß- und Kleinschreibung unterschieden. Wenn also Zeichenfolge 1 und Zeichenfolge 2 gleich, aber nicht im selben Fall sind, werden diese Vergleichsmethoden verwendet.
  3. Access Compare: Diese Methode wird bei Datenbankvergleichen verwendet.

Nun, wenn wir diese Funktion verwenden, welches Ergebnis erhalten wir? Mit dieser Vergleichsfunktion erhalten wir weder wahr noch falsch. Stattdessen können wir eines der folgenden Ergebnisse haben:

  1. 0, wenn die Zeichenfolgen gleich sind.
  2. 1, wenn die Zeichenfolgen nicht miteinander übereinstimmen.
  3. -1 wenn der erste String kleiner als String 2 ist.
  4. NULL, wenn für Zeichenfolge 1 und Zeichenfolge 2 kein Wert vorhanden ist.

Wir werden einige verschiedene Beispiele durchgehen und sehen, wie diese Zeichenfolgenvergleiche in VBA durchgeführt werden.

Wie verwende ich die VBA StrComp-Funktion in Excel?

Wir werden lernen, wie man eine VBA StrComp-Funktion mit einem Beispiel in Excel verwendet.

Sie können diese VBA StrComp Excel-Vorlage hier herunterladen - VBA StrComp Excel-Vorlage

Beispiel # 1 - VBA StrComp

Verwenden wir zunächst die Binärvergleichsmethode für unser Beispiel. Wir nehmen zwei Zeichenketten-Eingaben vom Benutzer entgegen, eine in Kleinbuchstaben und die andere in Großbuchstaben und vergleichen sie.

Schritt 1: Von der Registerkarte des Entwicklers und dann von Visual Basic, um in den VB-Editor zu gelangen.

Schritt 2: Fügen Sie ein Modul über die Registerkarte Einfügen ein, um mit dem Schreiben von Codes in VBA zu beginnen.

Schritt 3: Doppelklicken Sie auf der Registerkarte Projekt auf das Modul und deklarieren Sie eine Unterfunktion wie folgt.

Code:

 Sub Sample () End Sub

Schritt 4: Wir müssen drei Variablen als Zeichenketten definieren, zwei halten unsere Eingabe, während eine andere das Ergebnis speichert.

Code:

 Sub Sample () A, B, C als String End Sub abmessen

Schritt 5: Nehmen Sie in Variable A und B die folgenden Eingaben vom Benutzer für zwei Zeichenfolgen vor.

Code:

 Sub Sample () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") End Sub

Schritt 6: Vergleichen Sie beide Zeichenfolgen in Variable A und B und speichern Sie den Wert in C mit der STRCOMP-Funktion und verwenden Sie eine Vergleichsmethode als binären Vergleich.

Code:

 Sub Sample () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") C = StrComp (A, B, vbBinaryCompare) End Sub

Schritt 7: Zeigen Sie die in Variable C gespeicherte Ausgabe mit der Funktion Msgbox an.

Code:

 Sub Sample () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") C = StrComp (A, B, vbBinaryCompare) MsgBox C End Sub

Schritt 8: Drücken Sie jetzt F5, um den Code auszuführen und zwei Eingabezeichenfolgen wie folgt bereitzustellen:

Schritt 9: Sehen Sie das Endergebnis wie folgt.

Als Ergebnis erhalten wir 1, da im binären Vergleich beide Zeichenfolgen nicht gleich sind, da eine der Zeichenfolgen in Großbuchstaben und die andere in Kleinbuchstaben geschrieben ist.

Beispiel # 2 - VBA StrComp

Lassen Sie uns nun eine andere Vergleichsmethode verwenden, nämlich VbTextCompare, und sehen, welche Ergebnisse wir für dieselben Eingaben erhalten, die wir oben angegeben haben.

Schritt 1: In das zuvor eingefügte Modul doppelklicken Sie auf der Registerkarte "Projekt" darauf und deklarieren Sie eine Unterfunktion, um das zweite Beispiel wie folgt zu bearbeiten.

Code:

 Sub Sample1 () End Sub

Schritt 2: Wir müssen drei Variablen als Zeichenketten definieren, zwei halten unsere Eingabe, während eine andere das Ergebnis speichert.

Code:

 Sub Sample1 () Dim A, B, C als String End Sub

Schritt 3: Nehmen Sie in Variable A und B die folgenden Eingaben vom Benutzer für zwei Zeichenfolgen vor.

Code:

 Sub Sample1 () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") End Sub

Schritt 4: Vergleichen Sie beide Zeichenfolgen in Variable A und B und speichern Sie den Wert in C mit der STRCOMP-Funktion und verwenden Sie die Vergleichsmethode als Textvergleich.

Code:

 Sub Sample1 () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") C = StrComp (A, B, vbTextCompare) End Sub

Schritt 5: Zeigen Sie die in Variable C gespeicherte Ausgabe mit der Funktion Msgbox an.

Code:

 Sub Sample1 () Dim A, B, C Als String A = InputBox ("Geben Sie einen String ein", "In Kleinbuchstaben") B = InputBox ("Geben Sie einen String ein", "In Großbuchstaben") C = StrComp (A, B, vbTextCompare) MsgBox C End Sub

Schritt 6: Drücken Sie jetzt F5 und geben Sie zwei Eingabezeichenfolgen wie folgt ein.

Schritt 7: Sehen Sie das Endergebnis wie folgt.

Als Ergebnis erhalten wir 0, da der Textvergleich nicht zwischen Groß- und Kleinschreibung unterscheidet, was bedeutet, dass die Zeichenfolgen gleich sind.

Beispiel # 3 - VBA StrComp

Nun habe ich einige Daten in Blatt 1 wie folgt. Ich möchte herausfinden, ob die Daten in Spalte A und Spalte B einander ähnlich sind oder nicht. Schauen Sie sich die Daten unten an.

Schritt 1: Lassen Sie uns im dritten Beispiel für unsere Daten wie folgt vorgehen.

Code:

 Sub Sample2 () End Sub

Schritt 2: Aktivieren Sie Arbeitsblatt 1, damit wir seine Eigenschaften verwenden können.

Code:

 Sub Sample2 () Arbeitsblätter ("Sheet1") Aktivieren Sie End Sub

Schritt 3: Deklarieren Sie zwei Variablen, eine als Ganzzahl, die für die Schleife verwendet wird, und eine als Zeichenfolge, die zum Speichern des Vergleichsergebnisses verwendet wird.

Code:

 Sub Sample2 () Worksheets ("Sheet1"). Aktivieren Sie Dim A As Integer Dim B As String End Sub

Schritt 4: Schreiben Sie den folgenden Code, um die for-Schleife zu vergleichen und zu verwenden.

Code:

 Sub Sample2 () Worksheets ("Sheet1"). Dim A als Integer Dim B als String für A = 2 bis 5 B = StrComp (Zellen (A, 1) .Value, Zellen (A, 2) .Value, vbBinaryCompare) Wenn B = 0, dann Zellen (A, 3) .Wert = "Gleich". Anderenfalls Zellen (A, 3) .Wert = "NICHT Gleich"

Schritt 5: Führen Sie den obigen Code aus und sehen Sie das Ergebnis in Blatt 1 wie folgt.

Keine der Saiten war im Vergleich gleich.

Dinge, an die man sich erinnern sollte

  • Dies ist eine Vergleichsfunktion.
  • Es wird 0, 1, -1 oder NULL zurückgegeben, was dazu führt, dass weder wahr noch falsch ist.
  • Wenn wir keine der Vergleichsmethoden bereitstellen, lautet die Vergleichsmethode standardmäßig VbBinaryCompare.
  • Die Vergleichsmethode ist ein optionales Argument für diese Funktion.

Empfohlene Artikel

Dies ist eine Anleitung zu VBA StrComp. Hier diskutieren wir die Verwendung der Excel VBA StrComp-Funktion zusammen mit praktischen Beispielen und einer herunterladbaren Excel-Vorlage. Sie können auch unsere anderen Artikelvorschläge durchgehen -

  1. VBA InStr erklärt mit Beispielen
  2. VBA Integer-Datentyp
  3. So wählen Sie eine Zelle mit VBA-Code aus
  4. Transponieren Sie einen Bereich in VBA
  5. VBA-Arbeitsblätter (Beispiele)

Kategorie:

VBA