小编致力于为大家奉献最有效的经验,让大家能够解决掉问题,但是大家也都知道,每个人遇到的情况都是不一样的,大家在看小编经验的同时,除了跟随操作,也需要自己的思考,举一反三的解决问题,这样才会变得更加有内涵,成为和小编一样的经验达人。excel中vba的程序控制语句使用详解,这里,让小编给大家介绍一下。

方法/步骤
-
1
首先我们打开一个工作样表作为例子。按下alt+f11进入vba编辑器,并新建一个模块作为学习的例子。
-
2
接下来我们搭建模块必须的准备工作,对变量进行显性声明,并新建一个模块定义。
-
3
vba中对程序操作的流程的控制使用if函数进行控制。在excel中也有if函数公式。大家可以理解意义同样是“如果”,但是vba中的if因为嵌套的条件可以更多,所以功能更加强大,而if函数公式则只是简单的显示判断条件后的是与否的结果。
-
4
vba中if函数与if函数公式同样的,在“如果”判断后,否的结果是去执行另外的程序语句,使用的是else函数,原理等同于if函数公式的显示否的结果。用语句表现出来就如图所示。
-
5
if后接的是逻辑表达式,也可以是条件判断式,then必须有,接续的是程序语句。结尾必须以end if结尾。上张图片中,我将end if放在了else之前,这样的写法是错误的。正确的写法应该是else包含在if和end if之间,大家可以思考一下为什么。
-
6
原因很简单,end if在else之前就结束了if的逻辑判断,不会再执行else语句,这样会造成程序出错。所以我们需要在end if之前做好所有的逻辑或条件判断。大家都知道if函数公式可以做嵌套条件判断,vba中if函数也可以,并且更强大。相关的语句可以使用elseif。
-
7
这里给大家一段完整的if代码,大家可以copy下来去实际试验一下,如果有什么不懂的地方,可以再私信我进行解决。
Sub liucheng()
If [a1] = "" Then
MsgBox "A1单元格没有内容!"
ElseIf [a1] - 2 = 0 Then
MsgBox "A1单元格的数等于2!"
ElseIf [a1] - 3 = 0 Then
MsgBox "A1单元格的数等于3!"
ElseIf [a1] + 5 = 0 Then
MsgBox "A1单元格的数等于-5!"
Else
MsgBox "A1单元格的数是多少!"
End If
End Sub
-
8
先写到这里了,谢谢大家的观看。
祝大家生活愉快。
小编还有许多其他的经验可以观看,如果无法解决问题可以联系小编进行咨询。
看不清楚图片的可以点击放大再看哦。
END
文章评论