vpa引用单元格

Excel_VBA_编程教程(完整版)excel高级教程

VBA - Excel编程概念之：【单元格和区域】一、如何引用单元格和区域

使用Visual Basic的普通任务是指定单元格或单元格区域，然后对该单元格或 单元格区域进行一些操作，如输入公式或更改格式。通常用一条语句就能完成操 作，该语句可标识单元格，还可更改某个属性或应用某个方法。

在Visual Basic中，Range 对象既可表示单个单元格，也可表示单元格区域。 下列主题说明了标识和处理 Range对象最常用的方法。

用A1样式记号引用单元格和单元格区域 可使用Range属性来引用A1引用样式中的单元格或单元格区域。下述子程 序将单元格区域A1:D5的字体设置为加粗。

Sub FormatRa nge()

Workbooks("Book1").Sheets("Sheet1").Ra nge("A1:D5") _

.Fo

nt.Bold :

End Sub

下表演示了使用 =True

Range属性的一些 A1样式引用。

引用

Ran ge("A1")

Ra

nge("A1:B5") 含义

单元格A1

从单元格A1到单元格B5的区域

Ra nge("C5:D9,G9:H16")多块选定区域

Ran ge("A:A")

Ran ge("1:1")

Ran ge("A:C")

Ran ge("1:5") A列

第一行

从A列到C列的区域 从第一行到第五行的区域 Range("1:1,3:3,8:8") 第 1、3 和 8 行

Range("A:A,C:C,F:F") A、C 和 F 列

用编号引用单元格

通过使用行列编号，可用 Cells属性来引用单个单元格。该属性返回代表单个

单元格的Range对象。下例中，Cells(6,1)返回Sheet1上的单元格 A6，然 后将Value属性设置为10。

Sub En terValue()

VBA编程过程中常用的单元格引用方式总结

1，当前表所有的单元格

Cells.ClearContents 清空当前表所有单元格的内容

2，当前活动单元格

ActiveCell.Value = '看见星光'

活动单元格的值等于聪明可爱的看见星光。

3，单个单元格

例如A1单元格，最常用的方式有3种：

[a1]

Range('a1') 等同于 Range('a'&1)

Cells(1,1) 等同于 Cells(1,'a')，也就是说列也可以用字母表示。

三种方式里书写最简便的是[a1]，运算效率最高的是cells(1,1)，自带方法属性的是Range，最后，后两种方式支持使用变量。

4，连续单元格区域

比如选取A1:B10单元格区域……

[a1:b10]

Range('a1:b10') 等同于 Range('a' & 1 & ':b' & 10)

Range('a1','b10') 等同于 Range(cells(1,1),cells(10,2)

Range('a1').Resize(10,2)，意思是以[A1]为起点，向下取10行，向右取2列……

第一种方法输入最简便，但不支持变量。第二种方法支持变量，但书写麻烦，第三种方法比较少用，第四种Resize常用，它也可搭配数组使用，以便将数组结果写入单元格区域。

5，不连续单元格区域

比如选取A1:A10,C1:C10,F1:F10三个单元格区域。

Range('a1:a10, c1:c10, f1:f10')

Union(Range('a1:a10'), Range('c1:c10'), Range('f1:f10'))

第一种方法是直接选取，缺乏足够的灵活性。第二种union是必会语句，常用于搭配变量进行单元格高效批量操作，例如合并单元格处理等等。

6，行和列

比如第一行

Rows(1)

Range('a1').EntireRow

Rows('1:2') 第1和2行

在VBA代码中引用Excel工作表中单元格区域的方式小结

问题一：在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)

问题二：在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)

ExcelVBA入门教程：选取单元格的8种方法

● 本技巧目的：掌握单元格的各种引用方法。

● Excel 就是由基本元素 -- 单元格构成的，它就像我们身体的细胞一样，可是非常重要的，千万不能小看它的作用。不论是学习 vba

还是 操作 Excel 本身， 最先接触到的就是单元格，只有熟练的掌握了，才能进行后续的操作。

★★★注意：下面所有的标点符号全部使用半角，或者说英文标点。代码中不区分大小写。

● 1.Range 属性

单个单元格的表示方法：

表示方法：Sheet1.Range("A1")

注释：

1）工作表 Sheet1 的单元格：A1, 书写格式：Sheet1.Range("英文字母+数字")

2）保持良好的习惯加上工作表名称，对于后续跨工作表的操作会减少很多的问题。就像寄快递时要把小区的每栋楼的编号写上一样，不会发生快递寄到隔壁楼的问题哟。

单元格地址选中使用命令: .Select Sheet1.Range("A1").Select

多个单元格的表示方法：

连续单元格：A3 到 C6 单元格

表示方法：Sheet1.range("A3:C6")

注释：

1）书写方法：Sheet1. ("英文字母+数字 : 英文字母+数字")

2）首尾单元格之间用 : 连接

二组连续单元格，组合起来的方法：

A3 到 C6 单元格 ， E7 到 G11 单元格

表示方法： Sheet1.range("A3:C6, E7:G11")

Sheet1.range("A3:C6,E7:G11").Select

注释：

1）书写方法：Sheet1. ("英文字母+数字 : 英文字母+数字, 英文字母+数字 : 英文字母+数字")

2）二组不连续的地址，中间用 ，分隔

3） 要点：连续单元格：首尾之间用 : 来连接， 二段不连续的单元格组合用 ，分隔

● 2. Cells 属性