vba怎么写多条件判断 (vba条件格式语句)

上一篇文章我们给大家分享了连接运算符并且举了一些例子,那么这一篇文章我们将给大家分享一下VBA基本语法的条件判断IF语句程序。

VBA中的if程序语句可以解决很多的问题。

主要就是判断条件,当判断条件满足时才去执行对应的语句块,条件不满足是不会执行相对应的语句块的。

我这里面文字叙述的并不多,就是通过一些流程图和一些例子分享给大家。

举个现实的例子:我们在生活当中就会遇到这种情况,当我们有时间我们就去逛街,否则不去逛街这种结构。

那么我们对应的IF程序结果就是这样的。

If 条件 then

语句1

语句2

……

Else

语句1

语句2

……

End if

方便大家理解我就画个简单的流程控制图:

vba中多条件判断的问题,vbaif条件语句

举个例子:

接下来要使用到的数据表格:

vba中多条件判断的问题,vbaif条件语句

vba中多条件判断的问题,vbaif条件语句

代码1:

Sub hh()

If Worksheets("sheet34").Cells(2, 3) >= 90 Then

Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(255, 0, 0)

Else

Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 255, 0)

End If

End Sub

再举个现实的例子:

今天十点之前如果女朋友来,我就陪女朋友逛街,如果十点以后来就陪女朋友看电影,其他时间来那就直接去吃饭。

像这种结构和刚才的结构就是不一样的结构。

If 条件 then

语句1

语句2

……

ElseIf

语句1

语句2

……

Else

语句1

语句2

……

End if

方便理解我在再画个简单的流程控制图:

vba中多条件判断的问题,vbaif条件语句

再举个例子:

vba中多条件判断的问题,vbaif条件语句

代码2:

Sub hh()

If Worksheets("sheet34").Cells(2, 3) >= 90 Then

Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(255, 0, 0)

ElseIf Worksheets("sheet34").Cells(3, 3) <= 80 Then

Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 255, 0)

Else

Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 0, 255)

End If

End Sub

喜欢的请关注我,谢谢!

明天继续给大家分享其他的语法结构。