Find Cell strating with [1-9] but string value

[silentwolf]

Hi guys,

I like to create a function that returns from a string true or false when the string starts with string between 1-9

Can someon help please?

Function StartsWithNumer(strText As String) As Boolean
    If Left(strText, 1) = ["1-9"] Then
    StartsWithNumer = True
    
    End If
    
End Function

this is not working but not sure how to change it..

Many thanks

Albert

 

[Phuoc]

Try this

Function StartsWithNumer(strText As String) As Boolean
  StartsWithNumer = Left(strText, 1) Like "[1-9]"
End Function

 

[dmt32]

try

Function StartsWithNumber(ByVal strText As String) As Boolean
    StartsWithNumber = CBool(strText Like "[1-9]*")
End Function

Note:
not sure if your function name had a typo

StartsWithNumber

but I have included the b

Dave

 

[Anthony47]

In addition to the Udf, and you already got working samples, you can do that via formula; for example:

=IF(AND(CODE(A2)<58,CODE(A2)>48),TRUE,FALSE)

Bye

 

[Phuoc]

Or:

=ISNUMBER(1/LEFT(A2,1))

 

[silentwolf]

try

Function StartsWithNumber(ByVal strText As String) As Boolean
    StartsWithNumber = CBool(strText Like "[1-9]*")
End Function

Note:
not sure if your function name had a typo

StartsWithNumber

but I have included the b

Dave

 

[silentwolf]

Hi guys,

many thanks to you all! And yes I had a typo in my function...

I also tried in the meantime and came just up with a working function myself too ,)

Function StartsWithNumber(strText As String) As Boolean
    If IsNumeric(Left(strText, 1)) Then
        StartsWithNumber = True
    End If
End Function

 

[silentwolf]

Did not think isNumeric would work as it is a string..

Well learned something again.

Many thanks to you all for your input and help!

Cheers!

 

[dmt32]

Many thanks to you all for your input and help!

Cheers!

You are welcome - glad we were able to help you find a solution.

Dave