excel VBA语句之select判断语句使用
- 2022-01-15
- 来源/作者： 菜鸟图库/ 菜鸟图库
- 519 次浏览
今天教大家一些，在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
标签(TAG) VBA教程
