I am trying to get the SECOND SELECT CASE to recognize the first numeric character invx2 = "305g" for further processing
it does not recognize it
If I convert it to an IF statement it processes fine, but it would be easier if it remains a Case statement as it is just one of several conditions
Can anyone tell me why it doesn't work and or how to fix it
Thanks
Code
Sub test305g()
Dim item As String
vx1 = "305"
vx2 = "305g"
item = "1 305g can paint"
Range("b1:b2").ClearContents
Select Case vx1
Case IsNumeric(Left(vx1, 1))
Range("b1").Value = item
End Select
Select Case vx2
Case IsNumeric(Left(vx2, 1))
Range("b2").Value = item
End Select
If IsNumeric(Left(vx2, 1)) Then 'no space metric
Range("b3").Value = item
End If
End Sub
Display More