VBA-String-Manipulationsfunktionen & Operatoren

VBA-String Operatoren

Stringdaten werden verwendet, um Daten zu speichern, die aus Zahlen, Zeichen und Symbolen bestehen. „Jul-2015“ ist ein Beispiel für Stringdaten. Es besteht aus

• Charaktere (Juli)
• Symbol (-)
• Numbers (2015)

String-Operatoren werden verwendet, um String-Daten zu manipulieren. Sie können beispielsweise den Wert von Juli 2015 aus den ersten drei Buchstaben des Monats und des Jahres zusammensetzen, also „Jul-3“.

Die folgende Tabelle zeigt den VBA-Zeichenfolgenverkettungsoperator.

Beispielquelle Code

MsgBox "John " & "Doe", vbOKOnly, "Concatenate Operator"

Die Ausführung des obigen Codes führt zu folgendem Ergebnis

Das kaufmännische Und-Zeichen ist nicht das einzige Symbol, das Text verbindet, und der Unterschied zwischen den beiden ist wichtig, sobald Zahlen ins Spiel kommen.

Unterschied zwischen & und + bei der Zeichenkettenverkettung

VBA akzeptiert sowohl das kaufmännische Und-Zeichen (&) als auch das Pluszeichen (+) zwischen zwei Textwerten, weshalb Anfänger sie oft als austauschbar betrachten. Sobald einer der Operanden eine Zahl oder ein leerer Wert ist, verhalten sie sich jedoch anders, und nur eines von beiden ist zulässig.

💡 Tipp: Verwenden Sie für die Verkettung immer das kaufmännische Und-Zeichen und reservieren Sie das Pluszeichen für … RechenoperationenSetzen Sie vor und nach dem kaufmännischen Und-Zeichen (&) jeweils ein Leerzeichen, da VBA die Schreibweise Total& als Zeichen für die Typdeklaration Long interpretiert.

VBA-String-Manipulationsfunktionen

Die VBA-String-Manipulation ist ein wichtiges Element in Excel VBA für Makroprogrammierung und Zeichenfolgenoperationen. Excel bietet verschiedene Arten von VBA-Zeichenfolgenmanipulationsfunktionen wie:

• Links: wird verwendet, um zu extract Zeichen von der linken Seite der Zeichenkette
• Rechts: wird verwendet, um zu extract Zeichen von der rechten Seite der Zeichenkette
• Mid: wird verwendet, um zu extraceine Teilzeichenkette aus der Mitte einer Zeichenkette
• Len: wird verwendet, um die Länge einer Zeichenfolge zu ermitteln
• InStr: wird verwendet, um die Position eines Teilstrings in einem String zu finden
• TrimDer Doppelpunkt (:) wird verwendet, um Leerzeichen an beiden Enden einer Zeichenkette zu entfernen.
• ErsetzenDer Doppelpunkt wird verwendet, um jedes Vorkommen einer Teilzeichenkette durch eine andere zu ersetzen.
• UCase / LCaseDoppelpunkte werden verwendet, um eine Zeichenkette in Großbuchstaben oder Kleinbuchstaben umzuwandeln.

Die Tabelle unten zeigt die Syntax jeder Funktion mit einem durchgerechneten Beispiel, sodass Sie das Muster direkt in ein Makro kopieren können.

Das untenstehende Makro kombiniert mehrere dieser Funktionen, um eine Datumsbezeichnung aus ihren Teilen wiederherzustellen.

Sub StringFunctionsDemo()
    Dim Source As String
    Dim MonthPart As String
    Dim YearPart As String

    Source = "July-2015"

    ' Take the first three characters
    MonthPart = Left(Source, 3)
    ' Take the last four characters
    YearPart = Right(Source, 4)

    MsgBox MonthPart & "-" & YearPart, vbOKOnly, "String Functions"
End Sub

Die Ausführung des Makros zeigt Jul-2015 an. Jede Funktion gibt einen neuen Wert zurück und lässt die ursprüngliche Zeichenkette unverändert, weshalb die Ergebnisse problemlos in einem einzigen Ausdruck kombiniert werden können.

Diese Funktionen verarbeiten jeweils nur eine Zeichenkette. Wenn ein einzelner Wert eine ganze Liste enthält, eignen sich zwei andere Funktionen besser dafür.

Wie man Zeichenketten in VBA aufteilt und zusammenfügt

In Excel eingefügte Daten liegen oft als ein einziger langer Wert mit Trennzeichen zwischen den einzelnen Elementen vor, z. B. „Pepsi,Coke,Fanta,Juice“. Das Einlesen mit MID und INSTR ist langsam und fehleranfällig. VBA bietet ein perfekt aufeinander abgestimmtes Funktionspaar für genau diese Aufgabe.

Split nimmt eine durch Trennzeichen getrennte Zeichenkette entgegen und gibt ein nullbasiertes Array zurück, wobei jedes Element einem Element entspricht. Registrieren Die Funktion `Join` bewirkt das Gegenteil: Sie nimmt ein Array entgegen und gibt einen einzelnen String mit einem Trennzeichen zwischen den Elementen zurück. Beachten Sie, dass `Join` mit einem Array arbeitet, nicht mit zwei separaten Strings.

Sub SplitAndJoinDemo()
    Dim Source As String
    Dim Items() As String
    Dim i As Long

    Source = "Pepsi,Coke,Fanta,Juice"

    ' Break the value into an array on every comma
    Items = Split(Source, ",")

    For i = LBound(Items) To UBound(Items)
        Sheet1.Cells(i + 1, 1).Value = Items(i)
    Next i

    ' Rebuild the list with a different separator
    MsgBox Join(Items, " | "), vbOKOnly, "Joined List"
End Sub

Die Schleife schreibt jedes Getränk in eine eigene Zeile des Tabellenblatts, und die Meldungsbox zeigt anschließend Pepsi | Cola | Fanta | Saft an. Drei Punkte machen dieses Muster im Produktivcode zuverlässig:

• Ergebnis bei Nullbasis: Split gibt immer ein Array zurück, das bei 0 beginnt, unabhängig davon, wie Option Base eingestellt ist. Daher sollte die Schleife mit LBound und UBound anstatt mit einer festen Zahl gesteuert werden.
• Deklarieren Sie als String(): Weisen Sie das Ergebnis einem dynamischen String-Array zu. Die vorherige Deklaration einer festen Größe führt zu einem Kompilierfehler.
• Leerer Eingang: Das Aufteilen einer leeren Zeichenkette ergibt ein Array ohne Elemente. Testen Sie daher mit UBound, bevor Sie Items(0) lesen.

Selbst bei Auswahl der richtigen Funktion schlägt String-Code in einer kleinen Anzahl vorhersehbarer Fälle fehl.

Häufige VBA-Zeichenfolgenfehler und wie man sie behebt

Die meisten String-Fehler in Excel VBA lassen sich auf wenige Ursachen zurückführen. Das Erkennen der Symptome spart eine lange Fehlersuche.

• Typenkonflikt bei der Verkettung: Zwischen Text und Zahl wurde ein Pluszeichen verwendet. Ersetzen Sie es durch ein kaufmännisches Und-Zeichen (&), das die Zahl automatisch umwandelt.
• InStr gibt 0 zurück: Die Teilzeichenkette wurde nicht gefunden. InStr gibt im Fehlerfall 0 statt -1 zurück. Prüfen Sie daher, ob der Wert größer als null ist, bevor Sie das Ergebnis an Mid übergeben.
• Ungültiger Prozeduraufruf in Mid oder Left: Die angeforderte Länge ist negativ oder die Startposition liegt unter 1. Schützen Sie den Aufruf mit Len, damit die Länge die Zeichenkette niemals überschreitet.
• Vergleiche, die übereinstimmen sollten, es aber nicht tun: Nachfolgende Leerzeichen in importierten Daten führen zu einem Fehler bei der Gleichheitsprüfung. Verwenden Sie dazu auf beiden Seiten Trim und StrComp, wenn Groß- und Kleinschreibung ignoriert werden soll.
• Text, der nicht in eine Zahl umgewandelt wird: Ein Wert wie „1,200“ führt aufgrund des Trennzeichens zu einem Rechenfehler. Entfernen Sie das Trennzeichen mit Replace, bevor Sie den Wert mit CLng konvertieren.

Laden Sie Excel herunter, das den obigen Code enthält

Laden Sie die obige Excel-Datei herunter. Code

Häufig gestellte Fragen