判断是否为数字

Sub test()
　　If Not VBA.IsNumeric([a1]) Then MsgBox "非数字"
End Sub

【推广】 免费学中医，健康全家人
原文地址：https://www.cnblogs.com/AntipasChen/p/7204923.html