Seite 1 von 1

Komma durch Punkt ersetzen

Verfasst: Mo, 18.10.2004 15:09
von bienlein
Hallo,

ich suche eine Funktion mit der ich in einem String alle Kommas durch einen Punkt ersetzen kann.

Alternativ würden mit auch Funktionen weiterhelfen mit denen ich die länge des Strings herausfinden könnte und den String dann Zeichen für Zeichen durchsuchen kann.

Vielen Dank schonmal
Matthias

Re: Komma durch Punkt ersetzen

Verfasst: Mo, 18.10.2004 15:42
von Stephan
bienlein hat geschrieben:Hallo,

ich suche eine Funktion mit der ich in einem String alle Kommas durch einen Punkt ersetzen kann.

Alternativ würden mit auch Funktionen weiterhelfen mit denen ich die länge des Strings herausfinden könnte und den String dann Zeichen für Zeichen durchsuchen kann.

Vielen Dank schonmal
Matthias

Code: Alles auswählen

Sub Main
MeinText = ",a,b,c,,,d,e,f,"
msgbox MeinText
For i = 1 to Len (MeinText)
	if MID(MeinText,i,1)= "," Then
		MID(MeinText,i,1,".")
	end If
Next
Msgbox MeinText
End Sub
Stephan