文档介绍：word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
2
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
Excel_VBA_编程教程(完好版)excel高级教程
VBA-Excel编程观点之:【单元格和地区】一、怎样引用单元格和地区
使用VisualBasic的一般任务是指定单元格或单元格地区，而后对该单元格或单元格地区进行一些操作，如输入公式或改正格式。往常用一条语句就能达成操作，该语句可表记单元格，还可改正某个属性或应用某个方法。
在VisualBasic中，Range对象既可表示单个单元格，也可表示单元格地区。以下主题说了然表记和办理Range对象最常用的方法。
用A1款式记号引用单元格和单元格地区
可使用Range属性来引用A1引用款式中的单元格或单元格地区。下述子程序将单元格地区A1:D5的字体设置为加粗。
SubFormatRange()
Workbooks("Book1").Sheets("Sheet1").Range("A1:D5")_
=True
EndSub
下表演示了使用 Range 属性的一些 A1款式引用。
引用
含义
Range("A1")
单元格A1
Range("A1:B5")
从单元格A1到单元格B5
的地区
Range("C5:D9,G9:H16")多块选定地区
Range("A:A")
A列
Range("1:1")
第一行
Range("A:C")
从A列到C列的地区
Range("1:5")
从第一行到第五行的地区
Range("1:1,3:3,8:8")
第1、3和8
行
Range("A:A,C:C,F:F")
A、C和F
列
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
2
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
用编号引用单元格
经过使用队列编号，可用 Cells属性来引用单个单元格。该属性返回代表单个
单元格的Range对象。下例中，Cells(6,1)返回Sheet1上的单元格A6，而后将Value属性设置为10。
SubEnterValue()
Worksheets("Sheet1").Cells(6,1).Value=10
EndSub
由于可用变量代替编号，因此Cells属性特别合适于在单元格地区中循环，以下例所示。
SubCycleThrough()
DimCounterAsInteger
ForCounter=1To20
Worksheets("Sheet1").Cells(Counter,3).Value=Counter
NextCounter
EndSub
注意假如要同时改正某一单元格地区中全部单元格的属性或对其应用方法，可使用Range属性。相关详尽信息，请参阅用A1款式记号引用单元格。
引用行和列
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
3
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
可用Rows属性或
元格地区的 Range
后将单元格地区的
Columns 属性来办理整行或整列。这两个属性返回代表单
对象。下例中，用 Rows(1) 返回Sheet1 上的第一行，然
Font对象的Bold属性设置为 True。
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
13
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
SubRowBold()
=True
EndSub
下表举例说了然使用 Rows和Columns 属性的一些行和列的引用。
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
13
word完整版ExcelVBA编程学****教案完整版excel高级学****教案==
引用
Rows(1)
Rows
Columns(1)
Columns("A")
Col