
Die `StrConv`-Funktion in VBA (Visual Basic for Applications) wird verwendet, um einen String in verschiedene Zeichenformate umzuwandeln. Diese Funktion ist sehr nützlich, wenn Sie die Groß- und Kleinschreibung eines Strings ändern oder einen String in Unicode konvertieren möchten.
Die grundlegende Syntax der `StrConv`-Funktion lautet:
StrConv(String, Conversion As VbStrConv, [LocaleID As Long])
- String: Der String, der umgewandelt werden soll.
- Conversion: Der Typ der Umwandlung, die angewendet werden soll. Diese wird mit Konstanten vom Typ `VbStrConv` angegeben.
- LocaleID (optional): Ein Long-Wert, der die Gebietsschema-Einstellungen angibt, die für die Umwandlung verwendet werden sollen.
Konversionskonstanten
Einige der gebräuchlichsten Konstanten für `Conversion` sind:
- `vbUpperCase`: Wandelt den gesamten String in Großbuchstaben um.
- `vbLowerCase`: Wandelt den gesamten String in Kleinbuchstaben um.
- `vbProperCase`: Wandelt den ersten Buchstaben jedes Worts in einen Großbuchstaben um.
- `vbUnicode`: Wandelt den String in Unicode um (nur in 16-Bit-Systemen).
- `vbFromUnicode`: Wandelt den String von Unicode in die Standard-Zeichensatzdarstellung um.
Beispiel
Hier ist ein einfaches Beispiel, das zeigt, wie Sie die `StrConv`-Funktion verwenden können, um einen String in Großbuchstaben und dann in Proper Case umzuwandeln:
Sub BeispielStrConv()
Dim originalText As String
Dim upperText As String
Dim properText As String
originalText = "das ist ein Beispieltext."
' In Großbuchstaben umwandeln
upperText = StrConv(originalText, vbUpperCase)
MsgBox "In Großbuchstaben: " & upperText
' In Proper Case umwandeln
properText = StrConv(originalText, vbProperCase)
MsgBox "In Proper Case: " & properText
End Sub
In diesem Beispiel wird `originalText` zuerst in Großbuchstaben und dann in Proper Case umgewandelt, wobei die Ergebnisse jeweils in einer MessageBox angezeigt werden.
Beachten Sie, dass `vbUnicode` und `vbFromUnicode` normalerweise in älteren Systemen oder spezifischen internationalen Szenarien verwendet werden, da neuere Systeme Unicode nativ unterstützen.