Kurzfrage zu Val - Reststring

[Lupy]

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.

[RPP63]

Moin!
Schaue mal auf die letzte Funktion hier.

Gruß Ralf

[Lupy]

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.

[RPP63]

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

[schauan]

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

[atilla]

Auch Hallo in die Runde,

oder so:

Code:

Sub RPP()
Const Murks As String = "99Exeloffice"
MsgBox Replace(Murks, Val(Murks), "")
End Sub

[schauan]

Hallo atilla,
Eventuell das replace noch mit,1,1 ergänzen, falls hinten dran noch mal eine 99 kommt oder Mitten drin.

[schauan]

Hallo atilla,
Eventuell das replace noch mit,1,1 ergänzen, falls hinten dran noch mal eine 99 kommt oder Mitten drin.

[atilla]

Hallo Andre,

ok, aber warum noch ein mal jetzt?

[schauan]

Hallo atilla,
Ich bin mir keiner Schuld bewußt.Nicht dass da irgendwo was im Cache war...