Determine Variant Data Type (wrt Hard Data Types) [Resolved]

[Andrew G]

Would this work?

Private Sub Form_Load()
GetType "1231ABC"
End Sub
Private Sub GetType(StrVal As Variant)
If IsNumeric(StrVal) Then
    MsgBox "Is a number"
Else
    MsgBox "Is a string"
End If
End Sub