Strings in VBA

[mgiaco (Gast)]

Kann mir jemand mal bitte helfen.

Wie kann man in VBA aus eine String ein Zeichen lesen und in einen
Integer casten ==> also z.B.: aus "AA" => 65, 65 machen.

mfg mathias g.

[der mechatroniker (Gast)]

Einzelne Zeichen extrahieren: Mid()
In ASCII umwandeln: Asc()

[Pete da Heat (Gast)]

Hallo!

z.B. so:

Sub string_to_ascii_value()

Dim text As String
Dim i, ascii_value As Integer

text = "Hallo"
For i = 1 To Len(text)
    ascii_value = (Asc(Mid(text, i, 1)))
    'MsgBox (ascii_value)
Next i

End Sub

Je nachdem was Du mit Deinen ASCII-Werten anfangen willst, kannst du
sie ja z.B. in ein Array speichern...

Pete

[mgiaco (Gast)]

supper danke!!


mfg mathias