vba判断之If...Then

发布时间:2018-10-02

vba判断之If...Then
大家好!

VBA系列又和大家见面了!本期来看看VBA语法里的判断语句 if...thenif...thenElse

1.VBA里判断常用的方法是if...then(如果…那么),假如你需要基于一个条件选择一个操作,可以使用if...then该语句须以关键字End if结束。

例如:如果当前时间小于中午12点,那么用对话框提示'午好'Sub SayHello(
If Time < 0.5 Then MsgBox '上午好!' End Sub

译:If:如果;Then:那么;<:比较运算符号; 0.52分之一天,表示中午12点;

time:返回时间的函数 VBE窗口效果



时间是上午运行结果:

2.如果有多个条件,需要判断两次或者两次以上,可以用IFThenElse

例:如果时间在12点前提示'上午好',大于下午6点提示'上好',否则提示'下午好'

Sub SayHello(

If Time < 0.5 Then '如果系统时间小于12 那么

MsgBox '上午好!' '返回'上午好'

ElseIf Time > 0.75 Then '否则如果大于6 那么


MsgBox '晚上好' '返回'晚上好'

Else MsgBox '下午好' '否则返回'下午好'

End IfEnd Sub
VBE窗口效果如果要进行更多的判断,就在中间加入相应的Else if子句,这个语句还和逻辑运算符ANDOR配合使用。

运行结果:这个句子总是用如果…那么…否则造句,你是不是也这么赶脚的呢? 哈哈!3.练练手:

如果活动工作表的A1单元格为空,则提示'没有输入内容'否则提示'已经输入内容'把这个句子写下来,运行试试,对了吗?参考答案往下看:Sub 判断是否为空(
If Range('A1'.Value = '' Then
MsgBox '没有输入内容'

Else
MsgBox '已经输入内容' End If
End Sub
在活动工作表A1中输入内容来测试一下吧!欢迎加入我们

vba判断之If...Then

相关推荐