If 5th character is number text

[cortexnotion]

Hi All

I next to check column 9 and filter if the 5th character is a number or text, but I can't get the syntax right... I'm trying:

For a = LBound(ArrIN) To UBound(ArrIN)
    If IsNumeric(Mid((a, 9), 5, 1)) Then

and

For a = LBound(ArrIN) To UBound(ArrIN)
    If IsText(Mid((a, 9), 5, 1)) ThenThen

Any guidance appreciated. Thanks!

 

[maras]

You write too general. Perhaps instead of Mid (a, 9) there should be

If IsNumeric (Mid ([A9], 5, 1)) Then ...

A9 is cell A9

 

[Fluff]

How about

If IsNumeric(Mid(ArrIN(a, 9), 5, 1)) Then

 

[Dave Patton]

N.B. my comment does not relate to VBA but it may be applicable.

The mid of a string will yield text; +0 or -- will coerce the text to numeric.

T202007c.xlsm
	B	C
2	ABCD5F	TRUE
1e

Cell Formulas
Range	Formula
C2	C2	=ISNUMBER(--MID(B2,5,1))

 

[cortexnotion]

@Fluff that does the trick thank you.

@Dave Patton @maras thank you for your help also.

 

[Fluff]

Glad we could help & thanks for the feedback.