So kehren sie eine zeichenfolge in vba um (mit beispiel)

Sie können die StrReverse- Funktion in VBA verwenden, um eine Textzeichenfolge umzukehren.

Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

In diesem speziellen Beispiel wird jede Zeichenfolge im Bereich A2:A11 umgekehrt und die Ergebnisse im Bereich B2:B11 angezeigt.

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

Beispiel: So kehren Sie Zeichenfolgen mit VBA um

Angenommen, wir haben die folgende Spalte mit den Namen der Basketballmannschaften in Excel:

Angenommen, wir möchten den Namen jedes Teams umkehren und die Ergebnisse in der entsprechenden Zelle in Spalte B anzeigen.

Dazu können wir das folgende Makro erstellen:

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

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

Spalte B zeigt jeden Teamnamen in Spalte A rückwärts an.

Zum Beispiel:

• Aus Mavs wird svaM
• Aus Sporen werden SrupS
• Aus Rockets wird stekcoR
• Aus Kings wird sgniK

Und so weiter.

Beachten Sie, dass die StrReverse -Funktion auch mit Zahlen funktioniert.

Wenn Sie beispielsweise die StrReverse- Funktion auf die Zahl 1234 anwenden, wird 4321 zurückgegeben.

Zusätzliche Ressourcen

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

VBA: So überprüfen Sie, ob eine Zeichenfolge eine andere Zeichenfolge enthält
VBA: So zählen Sie die Anzahl der Zeilen im Bereich
VBA: So schreiben Sie COUNTIF- und COUNTIFS-Funktionen