Wie verwende ich die Funktion InStrRev in VBA?

Die Funktion `InStrRev` in VBA wird verwendet, um die Position des letzten Vorkommens einer bestimmten Zeichenfolge innerhalb einer anderen Zeichenfolge zu ermitteln. Sie durchsucht die Zeichenfolge von rechts nach links. Hier ist, wie Sie sie verwenden können:

Syntax

InStrRev(StringCheck, StringMatch, [Start], [Compare])
  • StringCheck: Erforderlich. Die Zeichenfolge, die durchsucht werden soll.
  • StringMatch: Erforderlich. Die Zeichenfolge, nach der gesucht wird.
  • Start: Optional. Die Position, an der mit der Suche begonnen werden soll (von rechts nach links). Wenn es weggelassen wird, beginnt die Suche am Ende der Zeichenfolge.
  • Compare: Optional. Gibt die Art des Vergleichs an. Die Werte können folgende sein:
    • `vbBinaryCompare` (0): Führt einen binären Vergleich durch.
    • `vbTextCompare` (1): Führt einen Textvergleich durch.
    • `vbDatabaseCompare` (2): Nur in Microsoft Access, vergleicht auf der Grundlage der Informationen in der Datenbank.

Beispiel

Hier ist ein Beispiel, das zeigt, wie Sie `InStrRev` verwenden können:

Sub BeispielInStrRev() Dim text As String Dim suche As String Dim position As Long text = "Das ist ein Beispieltext, um InStrRev zu demonstrieren." suche = "e" ' Suchen Sie das letzte Vorkommen von "e" in "text" position = InStrRev(text, suche) If position > 0 Then MsgBox "Das letzte Vorkommen von '" & suche & "' ist an Position: " & position Else MsgBox "Die Zeichenfolge '" & suche & "' wurde nicht gefunden." End If End Sub

In diesem Beispiel wird das letzte Vorkommen des Buchstabens “e” in der Zeichenfolge ermittelt und die Position wird in einer MessageBox angezeigt. Wenn das Zeichen nicht gefunden wird, zeigt die Nachricht an, dass die Zeichenfolge nicht gefunden wurde. Beachten Sie, dass die Position ab 1 gezählt wird.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project