VBA学习第三讲之select判断

select判断句和if用法区别不大，但是应用范围没有if广。select会先制定一个对象为case，然后针对case进行判断，优点是，书写时候看起来比较简洁，case后直接加判断条件，case else针对补集，而且不需要加then。缺点是if可以进行多个对象的判断，如可以判断单元格A1和A2是否同时满足某条件，select做不到这一点。

select 单条件判断

Sub justice5()

Select Case Range("a1").Value

Case Is > 0

Range("e1") = "positve"

Case Else

Range("e1") = "nonpositive"

End Select

End Sub

select语句多条件判断

Sub justice4()

Select Case Range("a1").Value

Case Is > 0

Range("d1") = "positive"

Case Is < 0

Range("d1") = "negative"

Case Else

Range("d1") = "zero"

End Select

End Sub

注意事项：select结束要有end select语句与之相对应。针对补集时，语句为case else，而if语句为elseif，else在前。