VBA中Range的使用方法.docVIP

VBA中Range的使用方法

VBA中Range的使用方法

Range对象最有用的一些属性如下：

*Address本属性返回Range的当前位置。

*Count本属性用于决定Range中单元格的数目。

*Formula本属性返回用于计算显示值的公式。

*Offset本属性对于从一个Range移动到另一个Range非常有用。

*Resize通过它可设置当前选中的Range的大小。

*Value返回Range的数值。

Range对象同样具有多种多样的方法，包括：

*Activate激活一个Range。

*Clear清除一个Range的内容。

*Copy将一个Range的内容复制到剪贴板。

*Cut将一个Range的内容剪切到剪贴板。

*PasteSpecial将剪贴板的内容粘贴到Range中。

*Select选择一个Range。

简单总结Range对象的一些常用属性和方法

1、Activate与Select

试验下面的过程：

SubSelectAndActivate()

Range(\B3:E10\).Select

Range(\C5\).Activate

EndSub

Select与Activate

Selection指单元格区域B3：E10，而ActiveCell则是单元格C5；ActiveCell代表单个的单元格，而Selection则可以代表单个单元格，也可以代表单元格区域。

也可以使用Cells属性进行相对引用，如：Range(“D10:G20”).Cells(2,3)‘表示引用单元格区域D10:G20中第2行第3列的单元格，即单元格F11也可使用语句：Range(“D10”).Cells(2,3)达到同样的引用效果。

5、Offset属性

Offset属性基于当前单元格按所给参数进行偏移，与Cells属性不同的是，它基于0即基准单元格为0，如：Range(“A10”).Cells(1,1)和Range(“A10”).Offset(0,0)都表示单元格A10当想引用于基准单元格区域同样大小的单元格区域时，则Offset属性是有用的。

6、Resize属性

可使用Resize属性获取相对于原单元格区域左上角单元格指定大小的区域。

7、SpecialCells方法

SpecialCells方法对应于“定位条件”对话框

8、CurrentRegion属性

使用CurrentRegion属性可以选取当前单元格所在区域，即周围是空行和空列所围成的矩形区域，等价于“CtrlShift*”快捷键。

9、End属性

End属性所代表的操作等价于“Ctrl方向箭”的操作，使用常量xlUp、xlDown、xlToLeft和xlToRight分别代表上、下、左、右箭。

10、Columns属性和Rows属性

Columns属性和Rows属性分别返回单元格区域中的所有列和所有行。

11、Areas集合

在多个非连续的单元格区域中使用Columns属性和Rows属性时，只是返回第一个区域的行或列，如：Range(“A1:B5,C6:D10,E11:F15”).Rows.Count

将返回5。此时应使用Areas集合来返回区域中每个块的地址