在我们即将利用VBA去控制Excel完成一些重复繁琐的工作时,我们需要了解一下Excel有哪些基本结构。
假设现在需要你打开一个名为“001.xlsx“表格文件第一个工作表的第一个单元格。往里面输入一个数字“1”。你需要做以下几个步骤
1.打开Excel应用程序
2.打开001.xlsx
3.选中第一个工作簿
4.选中A1单元格
5.输入数值”1“
其中这些步骤所对应的对象为下
Excel VBA常用对象
对象对象说明
Application代表Excel应用程序
Workbook代表工作簿,也就是xlsx表格文件
Worksheet代表工作表,也就是左下角的sheet1,sheet2啥的
Range单元格,或者单元格区域
Value代表单元格的值,除了value属性外,还有其它的比如字体型号,颜色等
咋一看,好像要记的东西有点多呀。其实,很多时候,我们只需要记住最后三个就可以了,为啥,因为一般来说,当我们运行宏的时候,第一步和第二步已经完成了。甚至大部分情况下,我们都是在同一个工作表下操作,甚至第三步,大部分情况也是可以省略的。所以下面我们编写一个宏,来验证一下上面的问题。
Sub 宏001() ’记得是英文括号噢!
Range("A1").value="1"
End Sub '结束宏
运行效果
那,要是合并单元格,我咋输入数字呢?比如下面这样:
对于合并单元格,有三种写入的方式。
1.起始单元格写入
合并单元格常见提示
我们知道,当我们把多个单元格合并时,默认只保留左上角的单元格数据,所以左上角的数据可以说是合并单元格的源数据。所以如果要在A1:B1合并单元格写入数据,只用在A1单元格写入数据即可。
2.合并单元格写入
合并单元格的表达方法就是Range(A:B),A代表左上角的起始单元格,B代表右下角的结束单元格。所以我们只需要这么写代码就可以写入了。
Sub 宏002() '记得是英文括号噢!
Range("A1:B1").Value = "1"
End Sub '结束宏
这里补充一句,假设A1:B1不是合并单元格,那么运行上面这个宏,最后两个单元格都会写入”1“;
3.输入框输入
有时候我们要输入的东西太多的时候,我们常常选中输入框输入。比如我们要在A1单元格输入公式,”=if(A2>B2,”你比我大”,”你可能比我小“)“
这个操作怎么完成呢?我们其实做了两步工作:
1.选中A1单元格
2.在输入框输入: =if(A2>B2,”你比我大”,”你可能比我小“)
那么问题来了,这个代码怎么写呢?额,其实,我也不会呀。
啥?你也不会,那你还写毛线博客?溜了!溜了!
但是,我不会写,VBA会自己写呀。
啥?你逗我吧。VBA可以自己写代码?
没啊!你不记得,第三节录制宏的时候,它的代码不就是自己生成的咩?
好像也是噢!
所以到了这里,我们只需要启动录制宏功能,然后根据刚刚分解的两个步骤,录制一个宏。然后点击宏-编辑功能,查看相关代码。代码如下:
Sub 录个宏来看代码()
'
' 录个宏来看代码 宏
'
'
Range("A1").Select
ActiveCell.FormulaR1C1 = "=IF(R[1]C>R[1]C[1],""你比我大"",""你可能比我小"")"
End Sub
上面的代码,我们可以看出两个东西。选中用的是.Select,输入框是ActiveCell.Formula,R1C1是啥东西呢?R,是row,也就是行的意思,C是column,也就是列的意思。
ActiveCell.FormulaR1C1,其实就是选中的单元格起始点。不然你在A2输入框输入数字也是这样的。至于右边的东东,R[1]C起始就是R[1][0],意思是说,我选中的这个单元格,相对于起始单元格,行,往下一行,列不动,也就是从A1,变成A2;同样的,R[1]C[1]就是行列各偏移一个单元格。好像和Offset函数一个样子。
其实没必要去记宏的代码,只要会录制,会用即可。(前提你也能基本看懂它的代码结构才行呀)
结语:其实为啥微软一直没有放弃用VBA这种低效率(相对于其它编程语言)作为window桌面程序的第三方编程控制语言,可能最大的原因就是因为它可以通过录制宏,自动生成相关代码吧。录制宏真的真的很重要,有时候可以帮我们解决很多难以记住的代码,我们所需要做的,就是把整个操作步骤分解,然后通过录制一个简单的宏,去修改他的代码,以达到为我所用的地步。
网友评论