Excel中使用vba控制语句的操作方法

Question

如题所述

Answer 1

　　excel中vba的程序控制语句使用详解，该如何去进行操作的呢?今天，小编就教大家在Excel中使用vba控制语句的操作方法。
　　Excel中使用vba控制语句的操作步骤如下：
　　首先我们打开一个工作样表作为例子。按下alt+f11进入vba编辑器，并新建一个模块作为学习的例子。
　　接下来我们搭建模块必须的准备工作，对变量进行显性声明，并新建一个模块定义。
　　vba中对程序操作的流程的控制使用if函数进行控制。在excel中也有if函数公式。大家可以理解意义同样是“如果”，但是vba中的if因为嵌套的条件可以更多，所以功能更加强大，而if函数公式则只是简单的显示判断条件后的是与否的结果。
　　vba中if函数与if函数公式同样的，在“如果”判断后，否的结果是去执行另外的程序语句，使用的是else函数，原理等同于if函数公式的显示否的结果。用语句表现出来就如图所示。
　　if后接的是逻辑表达式，也可以是条件判断式，then必须有，接续的是程序语句。结尾必须以end if结尾。上张图片中，我将end if放在了else之前，这样的写法是错误的。正确的写法应该是else包含在if和end if之间，大家可以思考一下为什么。
　　原因很简单，end if在else之前就结束了if的逻辑判断，不会再执行else语句，这样会造成程序出错。所以我们需要在end if之前做好所有的逻辑或条件判断。大家都知道if函数公式可以做嵌套条件判断，vba中if函数也可以，并且更强大。相关的语句可以使用elseif。
　　这里给大家一段完整的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
Excel中使用vba控制语句的操作