今天教大家一些，在VBA当中的select判断语句的使用的具体操作方法和场景。
一、select语句单一条件判断：
Sub select单条件判断()
i = 1
Select Case i
Case Is > 0
MsgBox "正数"
Case Else
MsgBox "负数"
End Select
End Sub
二、select语句多条件判断：
Sub select多条件判断()
Select Case Sheet1.[d1].Value
Case "A"
Sheet1.[a3] = "A型血的你，是个不怎么样的人！"
Case "B"
Sheet1.[a3] = "B型血的你，也是个不怎么样的人~"
Case "AB"
Sheet1.[a3] = "AB型血的你，是个更不怎么样的人~"
Case "O"
Sheet1.[a3] = "O型血的你，还是不错的！"
Case Else
Sheet1.[a3] = "没有这种型血，看来你 是个最不怎么样的人~！"
End Select
End Sub
转载请注明：范的资源库 » excelVBA语句之select判断语句使用
