EXCEL VBA中，怎样判定由用户输入的值，不包括在指定的几个值之中？
例如用INPUTBOX得到用户输入的变量A，判定A是否等于45，46，57，51中的一个。谢谢。...
例如用INPUTBOX得到用户输入的变量A，判定A是否等于45，46，57，51中的一个。谢谢。
展开
3个回答
展开全部
Sub x()
a = InputBox("请您输入一个数值")
Dim v As Variant
Dim x As String
x = "45，46，57，51"
v = Split(x, "，")
For i = 0 To UBound(v)
If a = v(i) Then
MsgBox "find"
Exit For
End If
Next
End Sub
a = InputBox("请您输入一个数值")
Dim v As Variant
Dim x As String
x = "45，46，57，51"
v = Split(x, "，")
For i = 0 To UBound(v)
If a = v(i) Then
MsgBox "find"
Exit For
End If
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
a = InputBox("请您输入一个数值")
If a = 45 Or a = 46 Or a = 51 Or a = 57 Then MsgBox "您输入的数是" & a
If a = 45 Or a = 46 Or a = 51 Or a = 57 Then MsgBox "您输入的数是" & a
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
if a=45 or a=46 or a=57 or a=51 then msgbox "有其中一个数:" & a
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
