当前位置:萝卜系统下载站 > 办公软件教程 > 详细页面

excel vba if判断语句的使用办法,在最后以一个案例来剖析vba if语句的具体应用

excel vba if判断语句的使用办法,在最后以一个案例来剖析vba if语句的具体应用

更新时间:2024-01-21 文章作者:未知 信息来源:网络 阅读次数:

Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。

 vba if语句为判断语句。根据条件的值,可使用 If...Then...Else 语句运行指定的语句或一个语句块。If...Then...Else 语句可根据需要嵌套多级。

  但是,为了代码的可读性,建议使用其余的语句,比如 Select Case 语句而不使用多层嵌套的vba中的 If...Then...Else 语句。

  vba if语句用法解释:

  当条件为 True 时,若只要执行一个语句,则可以使用单行的 If...Then...Else 语法。

  使用 If...Then...Else 语句可以定义两个可执行的语句块:其中一个块会在条件为True 时执行;而另一个块会在条件为 False 时执行。

  vba if语句执行流程如下:

vba if

  vba if语句实例剖析

  vba if语句练习题以论坛的练习题《VBA IF语句答题练习》来加以解释。

  此题共两段代码:第一段:

Sub 随机数()
?? [a1].Value = Int(Rnd * 20)
?? [c1].Value = Int(Rnd * 20)
End Sub

  解释:A1、C1单元格的值为随时生成的20以内的整数。Rnd是VBA中的随机函数,也可以使用excel工作表中的公式来取代上一段代码,如下:
Sub 随机数()
Range("A1,c1").Formula = "=Int(Rand() * 20)"
End Sub

第二段:
Sub 答题()
?? If [e1].Value = "" Then
????? MsgBox "还没有输入答案"
?? Else
???? End If
?? If [e1].Value = [a1].Value + [c1].Value Then
????? MsgBox "答对了,你真棒!"
?? Else
????? MsgBox "答错了,继续努力!"
?? End If
?? Call 随机数
End Sub

  代码解释:第一个IF语句:如果E1单元格为空,提示消息框:还没有输入答案。
  第二个IF语句:如果E1的值等于A1+C1,提示消息框:答对了,你真棒!,否则返回答错了,继续努力。最后用call关键字调用第一段代码。


Excel整体界面趋于平面化,显得清新简洁。流畅的动画和平滑的过渡,带来不同以往的使用体验。

温馨提示:喜欢本站的话,请收藏一下本站!

本类教程下载

系统下载排行

网站地图xml | 网站地图html