目录
1. 代码基本结构
Sub name() '定义一个函数'
'代码主体'
End Sub
2. 基础操作:对单元格
'选择单元格'
Sub CellSelect()
'选中单个单元格'的三种等价表示
'Example 1'
Cells(3,1).Select '选中A3,前面表示行,后面表示列'
'Example 2'
Cells(3,"a").Select '和上面一样的'
'Example 3'
Dim tmpRange As Range 'dim定义一个range变量'
Set tmpRange = Cells(3,1)
tmpRange.Select
'选中一个范围'
Range(Cells(3,2), Cells(7,3)).Select '选中从B3到C7的所有单元格'
Union(Cells(3,2), Cells(7,3)).Select '只选择B3和C7两个单元格'
End Sub