Worksheet 对象的 Range 和 Cells 属性
Range 对象的 Range 和 Cells 属性
Worksheet 对象的 Rows 和 Columns 属性
Range 对象的 Rows 和 Columns 属性
Range 对象的 Offset 属性
Application 对象的 Union 方法
option explicit
sub 单元格示例（）
dim i as range
set i = cells(2,5)
i.value = 7
end sub
1.range 对象
表示一个单元格、一行、一列、一个包含单个或若干连续单元格区域的选定单元格范围，或者一个三维区域。
例1：ranged代表一个单元格
option explicit
sub 单元格示例（）
dim i as range
'range后边是一个字符串，用双引号括起来'
set i = range("A5")
i.value = 7
end sub
例2：ranged代表单元格范围
option explicit
sub 单元格示例（）
dim i as range
'range后边是一个字符串，用双引号括起来'
set i = range("A3:B7,D6,A2:F4")
i.interior.color = vbyellow
end sub
image.png
set i =range(cells(2,3),cells(5,7)
利用cells代表一个range，可以灵活运用循环
2.range.clearcontents 方法
清理区域中的公式和值
例3.清除工作表1上单元格A1:G37中的公式和值，但单元格的格式和条件格式保留不变
sub 清除内容（）
worksheets("sheet1").range("A1:G37").clearcontents
end sub
3.range.font \ range.interior 属性
返回一个font对象，该对象代表指定对象的字体
option explicit
sub 设置单元格字体格式（）
dim i as range
set i = range("A2:B7")
'这个地方下边有优化'
i.font.name = "黑体"
i.font.size = 18
i.font.color = rgb(255,0,0)
i.font.bold =true
i.font.italic = true
'设置单元格内部填充颜色为黄色'
i.interior.color =rgb (255,255,0)
end sub
option explicit
sub 设置单元格字体格式（）
dim i as range
set i = range("A2:B7")
'利用with ..end with对单个对象或用户定义类型执行一系列语句。'
with i.font
.name = "黑体"
.size = 18
.color = rgb(255,0,0)
.bold =true
.italic = true
end with
'设置单元格内部填充颜色为黄色'
i.interior.color =rgb (255,255,0)
end sub
4.range.clearformats 方法
清除对象的格式设置，保留内容
range.clear
清除整个对象
5.range.merge \ range.unmerge 方法
range.merge 从指定的range对象创建合并单元格
range.unmerge 将合并区域分解为独立的单元格
