Hallo Freunde,
mit der Val Funktion lassen sich ja prima einem String vorangestellte Zahlen isolieren.
Mich würde der umgekehrte Fall interessieren. Wenn ich "99Exeloffice" habe, wie
bekomme ich dann möglichst schnell den Reststring, also bei diesem Beispiel hier "Exceloffice".
Danke wie immer im voraus für eure Bemühungen.
Moin!
Schaue mal auf die letzte Funktion
hier.
Gruß Ralf
Danke Ralf für deine superschnelle Antwort, aber ich brauch dazu unbedingt einen VBA Code.
Will das Ganze in ein kleines Programm von mir einbinden.
Nichts einfacher als dies … :19:
Sub RPP()
Const Murks As String = "99Exeloffice"
Dim Anfang&
For Anfang = 1 To Len(Murks)
If Not IsNumeric(Mid(Murks, Anfang, 1)) Then Exit For
Next
MsgBox Mid(Murks, Anfang, 9 ^ 9)
End Sub
Gruß Ralf
Hallöchen,
oder, um mal noch etwas bei Val zu bleiben
Code:
Sub RPP()
Const Murks As String = "99Exeloffice"
Dim lenMurks%
lenMurks = Val(Murks)
MsgBox Mid(Murks, Len(lenMurks) + 1, 9 ^ 9)
End Sub
Auch Hallo in die Runde,
oder so:
Code:
Sub RPP()
Const Murks As String = "99Exeloffice"
MsgBox Replace(Murks, Val(Murks), "")
End Sub
Hallo atilla,
Eventuell das replace noch mit,1,1 ergänzen, falls hinten dran noch mal eine 99 kommt oder Mitten drin.
Hallo atilla,
Eventuell das replace noch mit,1,1 ergänzen, falls hinten dran noch mal eine 99 kommt oder Mitten drin.
Hallo Andre,
ok, aber warum noch ein mal jetzt?
Hallo atilla,
Ich bin mir keiner Schuld bewußt.Nicht dass da irgendwo was im Cache war...