Funktion String Kürzen fünktioniert nicht korrekt
10.01.2007 08:59:10
MartinCH
Habe ein kleines Problem mit meiner Funktion zum kürzen eines String auf die richtige Länge.
Der String:
"/hilfe es geht nicht/zuviele Zeichen"
Die Funktion:
Function Kürzen_Text(Text As String) As String
Kürzen_Text = Left(Product, InStr(Product, "/"))
End Function
leider kriege ich nur folgenden wert zurück:
"/"
gewünschtes Resultat:
"/hilfe es geht nicht/"
Wenn das Produkt nicht mit / beginnt geht das Ding, wie kann ich die Funktion zwingen bis zum zweiten / zu gehen?
Danke für Eure Hilfe
Gruss
Martin