vba的单元格引⽤的总结
在VBA代码中引⽤Excel⼯作表中单元格区域的⽅式⼩结
分类:>>ExcelVBA对象模型编程>>常⽤对象>>Range对象
在使⽤ExcelVBA进⾏编程时，我们通常需要频繁地引⽤单元格区域，然后再使⽤相应的属性和⽅法对区域进⾏操作。所谓单元格区域，指的是单个的单元格、或者是由多个单元格组成的区域、或者是整⾏、整列等。下⾯，我们设定⼀些情形，以问答的形式对引⽤单元格区域的⽅式进⾏归纳。
问题⼀：在VBA代码中，如何引⽤当前⼯作表中的单个单元格(例如引⽤单元格C3)？
回答：可以使⽤下⾯列举的任⼀⽅式对当前⼯作表中的单元格(C3)进⾏引⽤。
(1) Range("C3")
(2) [C3]
(3) Cells(3, 3)
(4) Cells(3, "C")
(5) Range("C4").Offset(-1)
Range("D3").Offset(, -1)
Range("A1").Offset(2, 2)
(6) 若C3为当前单元格，则可使⽤：ActiveCell
(7) 若将C3单元格命名为“Range1”，则可使⽤：Range("Range1")或[Range1]
(8) Cells(4, 3).Offset(-1)
(9) Range("A1").Range("C3")
问题⼆：在VBA代码中，我要引⽤当前⼯作表中的B2:D6单元格区域，有哪些⽅式？
回答：可以使⽤下⾯列举的任⼀⽅式对当前⼯作表中单元格区域B2:D6进⾏引⽤。
(1) Range(“B2:D6”)
(2) Range("B2", "D6")
(3) [B2:D6]
(4) Range(Range("B2"), Range("D6"))
(5) Range(Cells(2, 2), Cells(6, 4))
(6) 若将B2:D6区域命名为“MyRange”，则⼜可以使⽤下⾯的语句引⽤该区域：
① Range("MyRange")
② [MyRange]
(7) Range("B2").Resize(5, 3)
(8) Range("A1:C5").Offset(1, 1)
(9) 若单元格B2为当前单元格，则可使⽤语句：Range(ActiveCell, ActiveCell.Offset(4, 2))
(10) 若单元格D6为当前单元格，则可使⽤语句：Range("B2", ActiveCell)
问题三：在VBA代码中，如何使⽤变量实现对当前⼯作表中不确定单元格区域的引⽤？
回答：有时，我们需要在代码中依次获取⼯作表中特定区域内的单元格，这通常可以采取下⾯的⼏种⽅式：
(1) Range(“A” & i)
(2) Range(“A” & i & “:C” & i)
(3) Cells(i,1)
(4) Cells(i,j)
其中，i、j为变量，在循环语句中指定i和j的范围后，依次获取相应单元格。
问题四：在VBA代码中，如何扩展引⽤当前⼯作表中的单元格区域？
回答：可以使⽤Resize属性，例如：
(1) ActiveCell.Resize(4, 4)，表⽰⾃当前单元格开始创建⼀个4⾏4列的区域。
(2) Range("B2").Resize(2, 2)，表⽰创建B2:C3单元格区域。
(3) Range("B2").Resize(2)，表⽰创建B2:B3单元格区域。
(4) Range("B2").Resize(, 2)，表⽰创建B2:C2单元格区域。
如果是在⼀个单元格区域(如B3:E6)，或⼀个命名区域中(如将单元格区域B3:E6命名为“MyRange”)使⽤Resize属性，则只是相对于单元格区域左上⾓单元格扩展区域，例如：
代码Range("C3:E6").Resize(, 2)，表⽰单元格区域C3：D6，并且扩展的单元格区域可不在原单元格区域内。
因此，可以知道Resize属性是相对于当前活动单元格或某单元格区域中左上⾓单元格按指定的⾏数或列数扩展单元格区域。
问题五：在VBA代码中，如何在当前⼯作表中基于当前单元格区域或指定单元格区域处理其它单元格区域？
回答：可以使⽤Offset属性，例如：
(1) Range("A1").Offset(2, 2)，表⽰单元格C3。
(2) ActiveCell.Offset(, 1)，表⽰当前单元格下⼀列的单元格。
(3) ActiveCell.Offset(1)，表⽰当前单元格下⼀⾏的单元格。
(4) Range("C3:D5").Offset(, 1)，表⽰单元格区域D3:E5，即将整个区域偏移⼀列。
从上⾯的代码⽰例可知，Offset属性从所指定的单元格开始按指定的⾏数和列数偏移，从⽽到达⽬的单元格，但偏移的⾏数和列数不包括指定单元格本⾝。
问题六：在VBA代码中，如何在当前⼯作表中引⽤交叉区域？
回答：可以使⽤Intersect⽅法，例如：
Intersect(Range("C3:E6"), Range("D5:F8"))，表⽰单元格区域D5:E6，即单元格区域C3:E6与D5:F8相重迭的区域。
问题七：在VBA代码中，如何在当前⼯作表中引⽤多个区域？
回答：
(1) 可以使⽤Union⽅法，例如：
Union(Range("C3:D4"), Range("E5:F6"))，表⽰单元格区域C3:D4和E5:F6所组成的区域。
Union⽅法可以将多个⾮连续区域连接起来成为⼀个区域，从⽽可以实现对多个⾮连续区域⼀起进⾏操
作。
(2) 也可以使⽤下⾯的代码：
Range("C3:D4, E5:F6")或[C3:D4, E5:F6]
注意：Range("C3:D4", "F5:G6")，表⽰单元格区域C3:G6，即将两个区域以第⼀个区域左上⾓单元格为起点，以第⼆个区域右下⾓单元格为终点连接成⼀个新区域。
同时，在引⽤区域后使⽤Rows属性和Columns属性时，注意下⾯代码的区别：
①Range("C3:D4", "F8:G10").Rows.Count，返回的值为8；
②Range("C3:D4,F8:G10").Rows.Count，返回的值为2，即只计算第⼀个单元格区域。
问题⼋：在VBA代码中，如何引⽤当前⼯作表中活动单元格或指定单元格所在的区域(当前区域)？
回答：可以使⽤CurrentRegion属性，例如：
(1) ActiveCell.CurrentRegion，表⽰活动单元格所在的当前区域。
(2) Range("D5").CurrentRegion，表⽰单元格D5所在的当前区域。
当前区域是指周围由空⾏或空列所围成的区域。该属性的详细使⽤参见《》⼀⽂。
问题九：在VBA代码中，如何引⽤当前⼯作表中已使⽤的区域？
回答：可以使⽤UsedRange属性，例如：
(1) Activesheet.UsedRange，表⽰当前⼯作表中已使⽤的区域。
(2) Worksheets("sheet1").UsedRange，表⽰⼯作表sheet1中已使⽤的区域。
与CurrentRegion属性不同的是，该属性代表⼯作表中已使⽤的单元格区域，包括显⽰为空⾏，但已进⾏过格式的单元格区域。该属性的详细使⽤参见《》⼀⽂。
问题⼗：如何在单元格区域内指定特定的单元格？
回答：可以使⽤Item属性，例如：
(1) Range("A1:B10").Item(5,3)指定单元格C5，这个单元格处于以区域中左上⾓单元格A1(即区域中第1⾏第1列的单元格)为起点的第5⾏第3列。因为Item属性为默认属性，因此也可以简写为：Range("A1:B10")(5,3)。
如果将A1:B10区域命名为”MyRange”，那么Range("MyRange")(5,3)也指定单元格C5。
(2) Range("A1:B10")(12,13)指定单元格M12，即⽤这种⽅式引⽤单元格，该单元格不必⼀定要包含在区域内。
同时，也不需要索引数值是正值，例如：
① Range("D4:F6")(0,0)代表单元格C3；
② Range("D4:F6")(-1,-2)代表单元格A2。
⽽Range("D4:F6")(1,1)代表单元格D4。
(3) 也可以在单元格区域中循环，例如：
Range("D4:F6")(2,2)(3,4)代表单元格H7，即该单元格位于作为左上⾓单元格E5的第3⾏第4列(因为E5是开始于区域中左上⾓单元格D4起的第2⾏第2列)。
(4) 也能使⽤⼀个单个的索引数值进⾏引⽤。计数⽅式为从左向右，即在区域中的第⼀⾏开始从左向右计数，第⼀⾏结束后，然后从第⼆⾏开始从左到右接着计数，依次类推。(注：从区域中第⼀⾏第⼀个单
元格开始计数，当第⼀⾏结束时，转⼊第⼆⾏最左边的单元格，这样按⼀⾏⼀⾏从左向右依次计数。以单元格区域中第1个单元格开始，按上述规则依次为第2个单元格、第3个单元格….等等)，例如：
Range("A1:B2")(1) 代表单元格A1；
Range("A1:B2")(2) 代表单元格B1；
Range("A1:B2")(3) 代表单元格A2；
Range("A1:B2")(4) 代表单元格B2。
这种⽅法可在⼯作表中连续向下引⽤单元格(即不⼀定是在单元格区域内，但在遵循相同的规律)，例如：
Range("A1:B2")(5)代表单元格A3；
Range("A1:B2")(14)代表单元格B7，等等。
也可以使⽤单个的负数索引值。
这种使⽤单个索引值的⽅法对遍历列是有⽤的，例如，Range("D4")(1)代表单元格D4，Range("D4")(2)
代表单元格D5，Range ("D4")(11)代表单元格D14，等等。
同理，稍作调整后也可遍历⾏，例如：
Range("D4").Columns(2)代表单元格E4，Range("D4").Columns(5)指定单元格H4，等等。
(5)当与对象变量配合使⽤时，Item属性能提供简洁并有效的代码，例如：
Set rng = Worksheets(1).[a1]
定义了对象变量后，像单元格⽅法⼀样，Item属性允许使⽤两个索引数值引⽤⼯作表中的任⼀单元格，例如，rng(3,4)指定单元格D3。(By Chip Pearson)
问题⼗⼀：在VBA代码中，如何引⽤当前⼯作表中的整⾏或整列？
resize函数vba回答：见下⾯的⽰例代码：
(1) Range("C:C").Select，表⽰选择C列。
Range("C:E").Select，表⽰选择C列⾄E列。
(2) Range("1:1").Select，表⽰选择第⼀⾏。
Range("1:3").Select，表⽰选择第1⾏⾄第3⾏。
(3) Range("C:C").EntireColumn，表⽰C列；
Range("D1").EntireColumn，表⽰D列。
同样的⽅式，也可以选择整⾏，然后可以使⽤如AutoFit⽅法对整列或整⾏进⾏调整。
问题⼗⼆：在VBA代码中，如何引⽤当前⼯作表中的所有单元格？
回答：可以使⽤下⾯的代码：
(1) Cells，表⽰当前⼯作表中的所有单元格。
(2) Range(Cells(1, 1), Cells(Cells.Rows.Count, Cells. Columns.Count))，其中Cells.Rows表⽰⼯作表所有⾏，Cells. Columns表⽰⼯作表所有列。
问题⼗三：在VBA代码中，如何引⽤⼯作表中的特定单元格区域？
回答：在⼯作表中，您可能使⽤过“定位条件”对话框。可以通过选择菜单“编辑——定位”，单击“定位”对话框中的“定位条件”按钮显⽰该对话框。这个对话框可以允许⽤户选择特定的单元格。例如：
(1) Worksheets("sheet1").Cells.SpecialCells(xlCellTypeAllFormatConditions)，表⽰⼯作表sheet1中由带有条件格式的单元格所组成的区域。
(2) ActiveCell.CurrentRegion.SpecialCells(xlCellTypeBlanks)，表⽰当前⼯作表中活动单元格所在区域中所有空⽩单元格所组成的区域。
当然，还有很多常量和值的组合，可以让您实现特定单元格的查并引⽤。参见《》⼀⽂。
问题⼗四：在VBA代码中，如何引⽤其它⼯作表或其它⼯作簿中的单元格区域？
回答：要引⽤其它⼯作表或其它⼯作簿中的单元格区域，只需在单元格对象前加上相应的引⽤对象即可，例如：
(1) Worksheets(“Sheet3”).Range(“C3:D5”)，表⽰引⽤⼯作表sheet3中的单元格区域C3:D5。
(2) Workbooks(“MyBook.xls”).Worksheets(“sheet1”).Range(“B2”)，表⽰引⽤MyBook⼯作簿中⼯作表Sheet1上的单元格B2。
问题⼗五：还有其它的⼀些情形吗？
回答：列举如下：
(1) Cells(15)，表⽰单元格O1，即可在Cells属性中指定单元格数字来选择单元格，其计数顺序为⾃左⾄右、从上到下，⼜如Cells(257)，表⽰单元格B1。
(2) Cells(, 256)，表⽰单元格IV1，但是如果Cells(, 257)，则会返回错误。
结语
我们⽤VBA对Excel进⾏处理，⼀般是对其⼯作表中的数据进⾏处理，因此，引⽤单元格区域是ExcelVBA编程中最基本的操作之⼀，只有确定了所处理的单元格区域，才能使⽤相应的属性和⽅法进⾏下⼀步的操作。
上⾯列举了⼀些引⽤单元格区域的情形和⽅式，可以看出，引⽤单元格区域有很多⽅式，有⼀些可能不常⽤，可以根据⼯作表的所处的环境和个⼈编程习惯进⾏选择使⽤。
当然，在编写程序时，也可能会将上⾯的⼀些属性联合使⽤，以达到选取特定操作对象的⽬的，例如Offset属性、Resize属性、CurrentRegion属性、UsedRange 属性等的组合。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。