Excel VBA怎样引用区域.pptVIP

Excel VBA 怎样引用区域 目录 ●引用一个单元格● ●引用一个区域● ●引用整行● ●引用整列● ●引用所有单元格● ●引用相对位置单元格● ●引用特殊区域（一）● ●引用特殊区域（二）● ●引用特殊区域（三）● 引用一个单元格 举例：引用单元格B5 [B5] 直接写地址，没有引号，无法循环 Range(B5) 地址为字符串，可行循环，但书写麻烦 Cells(5, B) 先行后列,行地址为数字，列地址为字符串，无法引用区域 Cells(5,2) 地址为数字，先行后列，行列都可循环，无法引用区域 Cells(4*Cells.Columns.Count+2) 用单一数字表示地址，一行行计数，先从左到右，再从上到下 B5上面有4个整行，乘以列数，再加上2格为B5 引用一个区域 举例：引用区域B5:D10 [B5:D10] 地址用冒号连接 Range(B5:D10) Range(B5, D10) 起止地址分别用引号括起来，中间用逗号连接 Range(Range(B5）,Range( D10)) Range嵌套 Range(Cells(5, 2), Cells(10, 4)) Range与Cells混合 引用整行 举例：引用第一行 [1:1] Range(1:1) Rows(1) 利用Rows（行）集合 举例：引用第一到第三行 [1:3] Range(1:3) Rows(1:3) 引用整列 举例：引用A列（第一列) [A:A] Range(A:A) Columns(1) 利用Columns（列）集合 Columns(A) 举例：引用A到C列（第一到第三列） [A:C] Range(A:C) Columns(A:C) 引用所有单元格 引用所有单元格 Cells 利用Cells（单元格）集合 Range(Cells(1, 1), _Cells(Cells.Rows.Count, Cells. Columns.Count)) 从第一行第一列到最后一行最后一列 引用所有行 Rows 利用Rows（行）集合 引用所有列 Columns 利用Columns（列）集合 引用相对位置单元格 使用Item关键字 Range(C5:D7).Item(1) 表示C5，从C5开始，D5为2，以下C6为3，D6为4… Range(C5:D7).Item(10) 表示D9，即在CD两列内以C5开头向后计数 Range(C5:D7).Item(0) 表示B5，即C5前一个，参数如果是负值则继续向前 Range(C5:D7).Item(2,10) 返回L6，即以C5为起点指定相对行列标，列标可以用字母 Range(C5:D7).Item(1,A) 以C5为A1，依次类推 引用特殊区域（一） 引用多个区域 [B5:D10, A1:C9] 可以多个区域 Range(B5:D10, A1:C9,…) 逗号在引号内部 Union(Range(B5:D10),Range(A1:C9)) 可以有多个Range型参数 引用交叉(公共)区域 Intersect(Range(B5:D10),Range(A1:C9)) 可以有多个Range型参数 引用特殊区域（二） 引用当前区域 Range(B1).CurrentRegion 当前区域是以空行和空列围成的区域 任何一个区域都有自己所属的当前区域 引用已用区域 ActiveSheet.UsedRange 不仅包括有数据的区域，还包括曾经用过的区域 以所有用过区域的中最上行最左列和最下行最右列围成 一个工作表只有一个用过区域 如果没有用过任何单元格，则已用区域为A1单元格 引用特殊区域（三） 引用活动单元格 Range(B5).Activate 只能用于活动工作表 引用当前选区 ActiveCell.CurrentRegion 引用偏移区域 Range(B5:D10).Offset(2,1) 引用C7:E12，偏移地址可正可负，默认为0，偏移地址先行后列 改变引用区域大小 Range (B5:D10).Resize(2,3) 如果省略参数，则大小不变 * * *