✔ Eine zeichenkette(String) durchlaufen und die einzelnen Buchstaben auslesen in VBA?

[rene2407]

Folgendes Problem:
Ich möchte einen String durchlaufen um anschließend die Buchstaben auszulesen und in einer Variable zuspeichern.

Ich habe folgendes versucht:

dim i as integer,Buchstaben as String,Wort as String

Wort = "Hallo Welt"
for i = 0 to 2
Buchstaben = Buchstaben & Wort.Char(i)
next i

Es funktionierte aber nicht.
Wie kann ich dieses Problem lösen?

 

[VBMichi]

Hallo Rene,

versuchs mal so:

Dim Wort As String, Buchstabe As String, i As Integer

Wort = "Hallo Welt"
For i = 1 To Len(Wort)
    Buchstabe = Mid$(Wort, i, 1)
    MsgBox Buchstabe
Next i

Grüße