Microsoft Office Tutorials and References
In Depth Information
8.3.1 Zeichenketten umwandeln
Die VBA-Funktion InStr() ermittelt die Position einer gesuchten
Teilzeichenkette. Das erste Zeichen hat die Position 1.
InStr()
Die Worksheet-Funktion Search() macht das Gleiche wie InStr() .
Bei InStr() können Sie aber noch die Art des Vergleichs wählen.
Search()
Abbildung 8.17
Ergebnis von InStr() bzw. Search()
Die Worksheet-Funktion Replace() dient zum Ersetzen einer Teilzei-
chenkette durch eine andere. Es werden folgende Parameter benötigt:
Replace()
Original-Zeichenkette
Position, ab der ersetzt werden soll
Anzahl der Zeichen, die ersetzt werden sollen
neue Teilzeichenkette, die anstelle der alten Teilzeichenkette ein-
gesetzt werden soll
Abbildung 8.18
Ergebnis von Replace()
8.3.1
Zeichenketten umwandeln
In Tabellenzellen können bekanntlich Zeichenketten oder Zahlen stehen.
Zahlen können auch als Datumsangaben formatiert sein. Die Zellinhalte
können Sie in Variablen des passenden Datentyps umwandeln, wenn
man Sie ihren Typ bzw. ihre Formatierung erkennen. Zur Erkennung
können Sie die Funktionen IsNumeric() und IsDate() nutzen, zur
Umwandlung die Funktionen CDbl() und CDate() . Ein Beispiel:
Erkennen,
umwandeln
Sub Umwandeln()
Dim x As Double
Dim d As Date
Dim s As String
Dim i As Integer
Search JabSto ::




Custom Search