电脑教程
位置:首页>> 电脑教程>> office教程>> excel vba if判断语句的使用方法,在最后以一个实例来剖析vba if语句的具体应用

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

  发布时间:2022-11-12 09:30:38 

标签:exact,if判断语句

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语句执行流程如下:

excel 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关键字调用第一段代码。

0
投稿

猜你喜欢

  • excel表格显示sheet步骤如下:1、可能是工作表窗口没有最大化,双击工作表窗口标题栏,最大化;2、可能是由于“显示工作表标签”前面的勾
  • Word文档中出现打字覆盖问题的解决方法其实出现打字覆盖的根本原因是:Word进入了改写模式!有可能在无意中按下了Insert键,使得Wor
  • 除了通过爱思助手进行升级刷机以外,很多用户也会通过使用iOS描述文件来升级相应的系统版本。苹果昨天已发布iOS12正式版,之前测试版所需的描
  • 图表制作方法大同小异,静态的图表想必大家都会做的吧,动态图表如何制作?你知道吗?动态图表的好处就在于切换科目图表可以自动变更数据,这点相对静
  • 你还在Excel中mod函数的使用方法而苦恼吗,今天,小编就教大家在Excel中mod函数的使用方法。Excel中mod函数的使用方法如下:
  • 我们用WPS表格进行工作表编辑时,需要在多个表格中编辑同样的内容,可能很多人采取的还是复制粘贴这种方法,其实有更好的方法编辑多个表格。下面给
  • 联想笔记本怎么重装回Win7操作系统,已经用惯了Win7的小伙伴对于Win10的操作系统,用的很不顺手,那么如果想要重装回Win7该如何操作
  • 我们每天都在使用Excel处理数据,有时候不知道什么原因,打开Excel的时候会弹出一个提示框,提示stdole32,下面简单介绍解决方法。
  • 搜狗拼音输入法在平时使用的过程中也许会发现自己的输入法状态栏的里面的备选字体过于小,尤其是老年人,如果需要打字的话,在备选字体显示里面最好是
  • A、B、C、D、E类网络地址分类意味着什么?IP地址从源头来看,其定义来自美国,现在还有大部分的A类IP地址在美国,早年没有VLSM技术的时
  • 很多用户在Win7电脑开机之后需要通过手动操作来连接网络,设置了自动联网之后就不要每次开机进行连接操作了,那么该怎么设置自动联网呢?针对这一
  • Win11更新导致部分显卡DX9报错,微软建议回滚,很多用户反映,微软的五月更新中Win11的新补丁可能导致一些GPU显卡的DX9出错,微软
  • word文字乱码怎么解决?在使用word软件的过程中,有的用户在打开了word文档后,发现word文字乱码,无法编辑查看,那么用户在办公过程
  • 稿定设计是一款优秀的平面设计软件,该软件不仅拥有丰富的视频编辑功能,而且还能够自己制作视频,不过很多小伙伴不清楚如何使用稿定设计来制作视频,
  • 在办公中经常会用到excel中的数值取整的功能,如果不懂的朋友不妨一起来学习研究一番。接下来是小编为大家带来的excel表格数值取整的方法,
  •  上期内容我们介绍了如何利用Excel制作个性电子简历的方法,那今天,再来给大家分享一个Word序号秒变身的小技巧吧!如图所示,老
  • Word2003不能输入文字解决方法:一、首先我们打开WORD文档,如图:    Word2003二、点击菜单栏里的“工
  • 微软已经向广大Windows Insider用户推送了2016年首个Win10RS1桌面预览版11099,该版本推送通道为“快速”。从目前已
  • 对于老师来说,Word中数学公式是经常会使用到的,若是要在文档中录入一些复杂的公式,要怎么做呢?很简单,在Word中有固定的公式和符号,下面
  • 微软针对Win10系统定期会推出系统补丁,但是有用户安装之后出现无法完成更新,正在撤销更改,且无限重启的情况,这该怎么办?不要着急,下面小编
手机版 电脑教程 asp之家 www.aspxhome.com