vba学习第一节：vba编辑器的使用与基本应用

一、编辑器的打开：

窗口图片介绍：

sub过程语法：

'sub过程语法：
Sub 宏名字()

MsgBox "holle world!"
' MsgBox "" 等同于python中的print()语句是输出的意思
End Sub

在vba中操作单元格对象用：Range
操作工作表对象用：Worksheets
操作工作簿对象用：workbooks

示例：

"学生数据"工作簿的"六年级1班"工作表中的"C3"单元格的区域:
Workbooks("学生数据").Worksheets("六年级1班").Range("C3")

如果学生工作簿是当前正在使用的工作簿，写法为：
Worksheets("六年级1班").Range("C3")

如果当前打开的是六年级一班的工作表，写法为：
Range("C3")

如何对单元格增、删、改、查

1、使用单元格的属性与方法：

赋值：

====为工作表C3单元格赋值100
Sub 赋值()

Range("C4").Value = 100

End Sub

====为工作表A1:B5单元格赋值1000
Sub 多区域赋值()

Range("A1:B5").Value = 1000

End Sub

====为工作表A1，B5单元格赋值100
Sub 多区域赋值()

Range("A1,B5").Value = 100

End Sub

cells(行，列)–属性：

该属性可以通过单元格所在的行，列号或单元格的索引号来引用单元格；
注：
cells属性只能引用单个单元格
列字段可设置为"D"字样

====给第二行第一个单元格赋值为666

Sub cells赋值()

Cells(2, 1).Value = 666

End Sub

sellct–行引用属性：

列引用属性为：columns
意思是：选择

rows–属性：

返回工作表中所有行组成的集合
注：

====选中第3行到第10行的第一行

Sub 选择()

Rows("4:6").Rows(1).Select

End Sub

offset–属性：

返回指定单元格相对位置的单元格区域
注：

====从B1单元格出发，向下偏移5行，向右偏移了0列
Sub 选择()

range("B1").offset(5,0).select

End Sub

End–属性：

获得行或列的首末端单元格

常用名称	作用
xlToLeft	返回最左端的单元格
xlToRight	返回最右端的单元格
xlToUp	返回最上端的单元格
xlToDown	返回最下端的单元格

注：

====表格最后一行填充数据

Sub 末端单元格选中()
Range("A1").End(xlDown).Offset(0, 1) = 93
Range("A1").End(xlDown).Offset(0, 2) = 94
Range("A1").End(xlDown).Offset(0, 3) = 95
End Sub