Einfache Instr-Funktion | Startposition | Null | Instr und If | Suche ohne Berücksichtigung der Groß-/Kleinschreibung
Benutzen Anleitung In Excel VBA um die Position eines Teilstrings in einem String zu finden. Die Instr-Funktion ist sehr vielseitig.
Platzieren Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt, und fügen Sie die folgenden Codezeilen hinzu. Um die Codezeilen auszuführen, klicken Sie auf die Befehlsschaltfläche auf dem Blatt.
Einfache Instr-Funktion
Standardmäßig beginnt die Funktion Instr mit der Suche am Anfang der Zeichenfolge (Position 1).
Code:
Dim-Zustand als String
Staat = "Virginia"
MsgBox InStr(state, "gin")
Ergebnis:
Hinweis: String "gin" an Position 4 gefunden.
Startposition
Die zweite Instr-Funktion unten beginnt mit der Suche an Position 7.
Code:
Dim-Zustand als String
Staat = "South Carolina"
MsgBox InStr(state, "o")
MsgBox InStr(7, Zustand, "o")
Ergebnis:
Erklärung: Die erste Instr-Funktion findet die Zeichenkette "o" an Position 2. Die zweite Instr-Funktion beginnt mit der Suche an Position 7 und findet die Zeichenkette "o" an Position 10.
Null
Die Instr-Funktion gibt 0 zurück, wenn der String nicht gefunden wird (wichtig, wie wir als nächstes sehen werden).
Code:
Dim-Zustand als String
Zustand = "Florida"
MsgBox InStr(state, "uns")
Ergebnis:
Fazit: String "uns" nicht gefunden.
Instr und If
Lassen Sie uns ein einfaches VBA-Programm erstellen, das die Instr-Funktion.
Code:
Dim-Zustand als String, Teilstring als String
Zustand = Range("A2").Wert
Teilzeichenfolge = Range("B2").Value
Wenn InStr(Zustand, Teilzeichenfolge) > 0 Then
Range("C2").Value = "Gefunden"
Anders
Range("C2").Value = "Nicht gefunden"
Ende Wenn
Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:
Erklärung: Zeichenfolge "outh" an Position 2 gefunden. Die Instr-Funktion gibt 2 zurück. Als Ergebnis platziert Excel VBA die Zeichenfolge "Gefunden" in Zelle C2.
Suche ohne Berücksichtigung der Groß-/Kleinschreibung
Standardmäßig führt die Instr-Funktion eine Suche unter Beachtung der Groß-/Kleinschreibung durch. Geben Sie die Zeichenfolge "Dakota" in Zelle B2 ein und klicken Sie auf die Befehlsschaltfläche auf dem Blatt.
Erklärung: String "dakota" nicht gefunden (erster Buchstabe nicht großgeschrieben). Die Instr-Funktion gibt 0 zurück. Als Ergebnis platziert Excel VBA die Zeichenfolge "Not Found" in Zelle C2.
Um eine Suche ohne Beachtung der Groß-/Kleinschreibung durchzuführen, aktualisieren Sie den Code wie folgt:
Dim-Zustand als String, Teilstring als String
Zustand = Bereich("A2").Wert
Teilzeichenfolge = Range("B2").Value
Wenn InStr(1, Zustand, Teilzeichenfolge, vbTextCompare) > 0 Then
Range("C2").Value = "Gefunden"
Anders
Range("C2").Value = "Nicht gefunden"
Ende Wenn
Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:
Erläuterung: Die oben gezeigte Instr-Funktion hat 4 Argumente. Um eine Suche ohne Berücksichtigung der Groß-/Kleinschreibung durchzuführen, geben Sie immer eine Startposition (erstes Argument) an und verwenden Sie vbTextCompare (viertes Argument).
