Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
612to616
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
612to616
612to616
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Einen String Zerlegen
18.05.2005 10:30:44
MichaelP
Guten Tag zusammen,
ich habe nur eine kurze einfache Frage?
Ich habe mir einen String gebaut, welchen ich an eine Funktion übergeben
String : S1/11/Hallo
Ich möchte deisen String nun wieder zerlegen. und die einzelnen Werte in einer Variablen speicher
Ergebnis:
Var1= S1
Var2 = 11
Var3 = Hallo
Ich danke Euch für Eure Hilfe.
Gruß
Michael

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

Betreff
Datum
Anwender
Anzeige
AW: Einen String Zerlegen
18.05.2005 10:44:55
bst
Morgen Michael,
nimm die VBA Funktion SPLIT.
cu, Bernd
--
Option Explicit

Sub x()
y "S1/11/Hallo"
End Sub


Sub y(s As String)
Dim i As Integer, z() As String
z = Split(s, "/")
For i = 0 To UBound(z)
Debug.Print i, z(i)
Next
End Sub

AW: Einen String Zerlegen
18.05.2005 10:48:28
Reinhard
Hallo Michael,
schau mal in der vba-Hilfe nach split.
Gruß
Reinhard
AW: Einen String Zerlegen
18.05.2005 10:54:07
UweD
Hallo
so gehts:

Sub zerlege()
Dim Strg$, P1%, P2%, Var1$, Var2$, Var3$
Strg = "S1/11/Hallo"
P1 = Application.Find("/", Strg, 1) 'Pos vom ersten /
P2 = Application.Find("/", Strg, P1 + 1) 'Pos vom zweiten /
Var1 = Left(Strg, P1 - 1)
Var2 = Mid(Strg, P1 + 1, P2 - 1 - P1)
Var3 = Mid(Strg, P2 + 1)
End Sub

Gruß aus Siegen
Anzeige

11 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige