Excel使用技巧之Excel VBA零基础入门到精通-VBA常用语句
第三讲:VBA常用语句
首先编写代码时,我们要打开VB编程界面,并新建一个模块,右击左侧的Excel对象,在下拉菜单的插入菜单中选择模块插入,在新建的模块中即可进行代码的编写
1、If语句详解与实践
IF语句的结构如下所示,
IF表示的是如果判断条件符合即执行Then之后的代码,如果条件不成立就执行Else之后的代码。
首先编写如下代码,
下面我们可以实现一个简单的多条件成绩分级判断,将成绩分为四个等级,我们先来了解一下多条件判断语句的基本结构,
与单条件判断不同的是,多条件判断有了更多的判断条件,并增加了一个新的单词ElseIf针对不同的条件,当某一个条件成立时,即执行该条件对应的Then之后的代码,注意,如果判断的条件有不止一个成立,则执行最靠前的成立条件对应的Then之后的代码,然后结束多条件判断过程。
如果只有一个判断条件,不关心不及格的人,可以简写如下:
编写好代码后,我们需要在sheet表中插入一个按钮,并将按钮绑定到我们编写的代码,这里我们将代码命名为“IF条件判断之多条件等级划分”,
使用鼠标绘制按钮时,推自动弹出一个指定宏的对话框,从中就能找到我们定义的相应函数,我们选中后点击确定即可。
之后我们可以尝试输入在b1单元格中输入一个数值,之后点击按钮,可以看到点击后b2
单元格显示了成绩的对应等级。
补充知识点:另类判断语句Select Case语句
2、循环语句详解与实践
2.1、 For next语句
基础语法
示例
加上步长参数:
循环实战1
我们要实现批量计算填充产品金额的目的,我们可以借助For Next结构实现,
我们首先要取出对应单元格的单价和数量,之后将计算得到的金额填充到相应的空白单元格中即可。
运行这段代码的效果如下所示,
2.2 For Each Next语句
当需要处理集合成员时,一般会用for each...next,实际上就是处理对象,我们这里实现一个检查F列中单元格内容是否小于60,如果是则将单元格填充为红色
运行结果如下:
补充知识点 Color颜色设置
http://www.360doc.cn/mip/.htmlExcel VBA中ColorIndex值与颜色对照表
如果用Color属性的话,则得使用RGB格式,代码如下:
RGB颜色表:http://www.wahart.com.hk/rgb.htm
补充知识点:Do Loop语句(之后会有用到)
3、With语句详解与实践
With语句:当对某个对象执行 一系列的语句时,不用重复指出对象的名称
Sub with偷懒语句2()
With Range("A1").Font
.Name = "宋体" '字体
.Size = 12 '大小
.Color = RGB(255, 0, 0) '颜色
.Bold = True '加粗
.Italic = True '倾斜
.Underline = True '下划线
End With
End Sub
这下面是助教写的,简单参考即可。
我们分别想要获取单元格a1的地址、工作表的名称以及将单元格a1赋值为“1234”,可以分别像上图所示,使用Range("a1")来获取单元格对象,
而使用with语句就可以简化书写过程,在需要多个对象的调用的时候省略调用过程的书写,
将Range("a1")的调用写到With语句中,这样在整个With语句的结束前,直接使用“.”就可以表示Range("a1")的调用过程。
4、对话框语句详解与实践
适当的使用对话框可以起到提示信息和防止误操作的目的,首先我们可以通过一段代码来了解一下提示框的基本操作,
提示框调用的基本格式,
MsgBox string & string & ···
https://www.cnblogs.com/mq0036/p/.html,非常好的帖子。
补充知识点:Inputbox对话框
练习2:各种语句的操作练习
5.课程相关资源
笔者获取方式:微信号获取添加如下微信:huaxz001 。笔者网站:华小智首页王宇韬相关课程可通过:京东链接:[https://search.jd.com/Search?keyword=王宇韬],搜索“王宇韬”,在淘宝、当当也可购买。加入学习交流群,可以添加如下微信:huaxz001(请注明缘由)。
各类课程可在网易云、51CTO搜索王宇韬,进行查看。