主题：[求助]数据大于或小于10位数，就会跳出提示框

老师，请问下，如果表A的A列输入的数据大于或小于10位数，那么就会跳出提示框，“你输入错误”代码该怎么写，谢谢！

DataColChanging事件

 

If e.DataCol.name = "第一列" Then
    If val(e.newvalue) >= 10 ^ 9 Then
        msgbox("错误")
        e.cancel = True
    End If
End If