zoukankan      html  css  js  c++  java
  • 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)

     

  • 相关阅读:
    关于递归的理解
    every few days
    相见恨晚
    VC中自定义消息处理函数的步骤
    wparam和lparam的区别
    VC中新建的类不见了的解决方法
    接连遇到大牛
    老总NB的 romman.sys
    [恢]hdu 1159
    [恢]hdu 1996
  • 原文地址:https://www.cnblogs.com/jier771/p/13745524.html
Copyright © 2011-2022 走看看