vba 判断 A1的数值是否是合法（只能是1、2、3、4、5）
答案:1 悬赏:20 手机版
解决时间 2021-04-06 16:43
- 提问者网友：疯孩纸
- 2021-04-05 17:31
vba 判断 A1的数值是否是合法（只能是1、2、3、4、5）
最佳答案
- 五星知识达人网友：一叶十三刺
- 2021-04-05 18:53
Option Explicit
Sub test()
Dim arr As Variant, brr As Variant
arr = Array(1, 2, 3, 4, 5)
brr = Filter(arr, ActiveSheet.[a1], 0)
If UBound(arr) > UBound(brr) Then
MsgBox "A1数据符合条件"
Else
MsgBox "A1数据不符合"
End If
End Sub
Sub test()
Dim arr As Variant, brr As Variant
arr = Array(1, 2, 3, 4, 5)
brr = Filter(arr, ActiveSheet.[a1], 0)
If UBound(arr) > UBound(brr) Then
MsgBox "A1数据符合条件"
Else
MsgBox "A1数据不符合"
End If
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯