VBA. How to find position of first digit in string

Question

I have string \"ololo123\". I need get position of first digit - 1. How to set mask of search ?

Answer 1

You could try regex, and then you'd have two problems. My VBAfu is not up to snuff, but I'll give it a go:

Function FirstDigit(strData As String) As Integer
    Dim RE As Object REMatches As Object

    Set RE = CreateObject("vbscript.regexp")
    With RE
        .Pattern = "[0-9]"
    End With

    Set REMatches = RE.Execute(strData)
    FirstDigit = REMatches(0).FirstIndex
End Function

Then you just call it with FirstDigit("ololo123").