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在前。

最后编辑于
© 著作权归作者所有,转载或内容合作请联系作者

推荐阅读 更多精彩内容