wie kann ich ein String umgekehrt ausgeben.
Bsp.
ich möchte dass aus " ICH LERNE VBA" " VBA LERNE ICH" wird.
Danke
Sub drehen()
Dim i As Integer, vntTMP, strTEXT As String
strTEXT = "Ich lerne VBA"
vntTMP = Split(strTEXT, " ")
strTEXT = ""
For i = UBound(vntTMP) To 0 Step -1
strTEXT = strTEXT & vntTMP(i) & " "
Next
strTEXT = Left(strTEXT, Len(strTEXT) - 1)
MsgBox strTEXT
End Sub
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe