String trennen......................

Forumthread: String trennen......................
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: String trennen......................

11.12.2007 21:17:00

Gast

Hallo,
ich bin mal wieder auf der Suche :-)
Ich möchte gerne einen String z.B. "119.49.114.110.55.101.57.114." mit VBA aufteilen.
Es sollten die Werte einzeln aufgeführt werden, der "." ist die jeweilige Trennvorgabe.
Als Wert sollte dann 119 dann 49 dann 114 etc. ausgegeben werden.
Leider fehlt mir mal wieder jeglicher Ansatz :-(
Die Recherche im Archiv war auch nicht sonderlich erfolgreich.
Gruß Gast

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Daten Text in Spalten !

11.12.2007 21:21:39

Matthias
AW: String trennen......................

11.12.2007 21:22:05

Peter
AW: ...to (Ubound(atemp) -1

11.12.2007 21:39:02

Gerd
oder so (hatte vba übersehen) ...

11.12.2007 21:46:00

Matthias
Ein Danke an alle...........

11.12.2007 22:11:04

Gast

Daten Text in Spalten !

11.12.2007 21:21:39

Matthias

Hallo

AW: String trennen......................

11.12.2007 21:22:05

Peter

Hallo Gast,
so könnte es gehen:
Annahme: Das Ergebnis soll in die Spalte A ab Zeile 1 eingetragen werden


Public Sub Zerlegen()
Dim sWert   As String
Dim aTmp    As Variant
Dim iIndex  As Integer
sWert = "119.49.114.110.55.101.57.114."
aTmp = Split(sWert, ".")
For iIndex = 0 To UBound(aTmp)
Cells(iIndex + 1, 1).Value = aTmp(iIndex)
Next iIndex
End Sub

Gruß Peter

AW: ...to (Ubound(atemp) -1

11.12.2007 21:39:02

Gerd

Es kann schon sein, dass es nicht auffällt, dass der letzte Punkt einen leeren Split-Wert ausgibt.
Grüße Gerd

oder so (hatte vba übersehen) ...

11.12.2007 21:46:00

Matthias

Hallo
Ich hatte das VBA übersehen, sorry.
Hier noch eine Variante:
Ich bin mal davon ausgegangen, das Du Dir den String aus einer Zelle holst.
https://www.herber.de/bbs/user/48402.xls
Userbild