Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Strimg umgekehrt ausgeben

Strimg umgekehrt ausgeben
15.06.2007 13:01:25
alcatraz
Hallo,
wie kann ich ein String umgekehrt ausgeben.
Bsp.
ich möchte dass aus " ICH LERNE VBA" " VBA LERNE ICH" wird.
Danke

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Strimg umgekehrt ausgeben
15.06.2007 13:12:32
Anton
Hallo alcatraz,
versuch's damit:

Sub b()
  strTest = "ICH LERNE VBA"
  teilen = Split(strTest, " ")
  For i = UBound(teilen) To 0 Step -1  
    msg = msg & teilen(i) & " "
  Next
  MsgBox msg
End Sub  

mfg Anton

Anzeige
AW: Strimg umgekehrt ausgeben
15.06.2007 13:19:00
alcatraz
Tausend DANK

AW: Strimg umgekehrt ausgeben
15.06.2007 13:13:00
Rudi
Hallo,

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

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige