保定做网站建设潜江建设局网站
《VBA之Excel应用》（版权10178983）是非常经典的，是我推出的第七套教程，定位于初级，目前是第一版修订。这套教程从简单的录制宏开始讲解，一直到窗体的搭建，内容丰富，实例众多。大家可以非常容易的掌握相关的知识，这套教程共三册，十七章，都是我们在利用EXCEL工作过程中需要掌握的知识点，希望大家能掌握利用。今日讲解的内容是:VBA之Excel应用第四章第二节：单元格对象的行、列属性
【分享成果，随喜正能量】105 任何寻求安慰的行为，都只会带来短暂的安全感，不能获得成长。成长是特别艰难的自省，必须抛弃所有顺应自己认知的言行。走不出自己的执念，到哪都是囚徒。。
第四章 单元格（Range）对象
大家好，我们这章开始学习单元格对象。单元格（Range）对象是Excel VBA中最重要的对象之一。本章概述了Range对象的属性和方法，包括如何声明一个单元格对象，如何选择单元格对象，以及对行、列的操作，还讲解了如何对单元格进行复制、粘贴、清除、计数，以及对当前区域CurrentRegion的讲解，还涉及到单元格的联合与交叉等。通过这章的学习，大家会更清楚地看到VBA的结构，以及在实际工作中VBA的综合利用。
第二节 单元格对象的行、列属性
大家好，我们继续讲解单元格对象的相关知识，这讲我们讲解单元格对象的行列属性。我们要深入地理解和掌握这些知识，在这章的开始我曾经讲过，对于EXCEL VBA而言几乎所有的代码都和单元格有关，所以，我们要认真地掌握这些知识点。
1 Range.Rows 属性
语法：expression.Rows 返回一个Range对象，它表示指定区域中的行。
参数expression一个表示Range对象的变量
- 若要返回单个行，可以使用Item属性或等效的在括号中使用索引号。 例如：
Selection.Rows(1)
Selection.Rows.Item(1)
返回所选内容的第一行。
- 当应用于一个区域的区域对象时，此属性仅从该区域的第一个区域中返回行。 例如，如果Range对象someRange有两个区域（A1：B2 和 C3：D4），则someRange.Rows.Count返回2，而不是4。 若要在一个可能包含多个选定区域的区域中使用此属性，请测试 Areas.Count 以确定该区域是否包含多个选择区域。
- 返回的区域可能位于指定区域之外。 例如，Range("A1:B2").Rows(5) 返回单元格 A5:B5。
2 Range.Columns 属性
语法：expression.Columns 返回一个 Range 对象，它表示指定区域中的列。
参数expression 一个表示 Range 对象的变量。
- 若要返回单个列，可以使用Item属性或等效的在括号中包含索引。例如，
Selection.Columns(1)
Selection.Columns.Item(1)
返回所选内容的第一列。
- 当应用于一个区域对象的区域对象时，此属性仅从该区域的第一个区域中返回列。 例如，如果Range对象有两个区域（A1：B2 和 C3：D4），则Selection.Columns.Count ，则返回2，而不是4。 若要对包含多个所选子区域的区域使用此属性，请测试 Areas.Count 以确定该区域是否包含多个子区域。
- 返回的区域可能位于指定区域之外。 例如，Range("A1:B2").Columns(5).Select 返回单元格 E1:E2。
- 如果使用字母作为索引，则该字母等效于数字。 例如，Range("B1:C10").Columns("B").Select 返回单元格 C1:C10，而不是 B1:B10。 在本例中，“B”相当于 2。
3 单元格对象行、列属性的应用实例
在下面的代码中，我们可以进一步理解单元格对象的行、列属性，代码：
Sub mynzD() '单元格的行属性
Dim myRange As Range
Set myRange = Range("A1:C4")
myRange.Rows(3).Select
End Sub
Sub mynzE() '单元格的列属性
Dim myRange As Range
Set myRange = Range("A1:C4")
myRange.Columns(2).Select
End Sub
代码截图：
代码讲解：
上面的两段代码比较类似，首先声明一个单元格对象的区域，然后将某个单元格范围赋给这个单元格对象。最后利用myRange.Rows(3).Select对行进行选择，用 myRange.Columns(2).Select 对列进行选择。
下面看代码的运行效果：
通过以上的实例，我们看到对单元格的行列属性的具体应用。
今日内容回向：
1） 单元格行列属性的意义是什么？
2） 要具体理解行列属性中的几个注意点。
本讲内容参考程序文件：工作簿04.xlsm
我20多年的VBA成果全在下面的资料中：
