vba判断是否为数字的方法

　　在VBA中，判断一个字符是否为数字的方法有很多。可以用isNumeric函数，也可以调用工作表isnumber函数，也可以用like运算符比较等

检查是否为数字
   Sub s2()
    Debug.Print VBA.IsNumeric(Range("a1"))
    Debug.Print Application.WorksheetFunction.IsNumber(Range("A1"))
    Debug.Print VBA.TypeName(Range("A1").Value)
   ' Debug.Print Range("a1").Value Like "#" '判断一位整数
   ' Debug.Print Range("a1") Like "*#*" '判断是否包含数字
   End Sub