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 将合并区域分解为独立的单元格