今天教大家一些,在VBA当中的select判断语句的使用的具体操作方法和场景。

一、select语句单一条件判断:

Sub select单条件判断()

i = 1

Select Case i

Case Is > 0

MsgBox "正数"

Case Else

MsgBox "负数"

End Select

End Sub

二、select语句多条件判断:

Office Excel VBA语句之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

发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注