美文网首页vba编程教程
第七节:了解Excel基本结构(1)

第七节:了解Excel基本结构(1)

作者: 潮办公 | 来源:发表于2019-06-20 16:01 被阅读0次

在我们即将利用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桌面程序的第三方编程控制语言,可能最大的原因就是因为它可以通过录制宏,自动生成相关代码吧。录制宏真的真的很重要,有时候可以帮我们解决很多难以记住的代码,我们所需要做的,就是把整个操作步骤分解,然后通过录制一个简单的宏,去修改他的代码,以达到为我所用的地步。

相关文章

网友评论

    本文标题:第七节:了解Excel基本结构(1)

    本文链接:https://www.haomeiwen.com/subject/wbrjqctx.html