excel VBA经常忘记的代码if

(1)VBA   if 用法:

if  ...  then ... else ....一行的写法               

if  条件  then 成立执行语句 else 不成立执行的语句   一行的写法

If a > 2 Then Cells(1, "A") = 1 Else Cells(1, "A") = 0

If a > 2 Then Cells(1, "A") = 1 Else: Cells(1, "A") = 0

这里Else直接空格 或者加":"都是可以的    

常用多行写法:

if  ... then 

   ....

elseif ...then

  ....

else:

   ....

end if

end if 经常忘记写不要忘记!

写个例子免得忘了:

Sub if用法()
a = 3
b = 2
If a > b Then

  Cells(3, "R") = 0

ElseIf a = b Then

  Cells(3, "R") = 1

Else:

  Cells(3, "R") = 2

End If
End Sub

以前写的例子:

Sub 多条件判断()
If Sheet1.Range("b2") >= 90 Then
  Sheet1.Range("b3") = "优秀"
ElseIf Sheet1.Range("b2") >= 80 Then
  Sheet1.Range("b3") = "良好"
ElseIf Sheet1.Range("b2") >= 60 Then
  Sheet1.Range("b3") = "合格"
Else: Sheet1.Range("b3") = "不合格"
End If
End Sub

函数if的用法:=if(条件,成立表达式,不成立表达式)

例子: =if(A3>10,"对的",A3*5)     

if(logical_test,value_if_true,value_if_false)

 

原文地址:https://www.cnblogs.com/jier771/p/13745524.html