Range 对象

         
DataSheet
Range

代表某一单元格、某一行、某一列、某一选定区域(该选定区域可包含一个或若干连续单元格块)。

使用 Range 对象

本部分将对下列返回 Range 对象的属性进行说明:

Range 属性

可用 Range(arg)(其中 arg 为区域名称)返回代表单个单元格或单元格区域的 Range 对象。下例将单元格 A1 中的值赋给单元格 A5。

myChart.Application.DataSheet.Range("A5").Value = _
    myChart.Application.DataSheet.Range("A1").Value

下例将单元格区域 A1:H8 中所有单元格的值都设置为 20。

myChart.Application.DataSheet.Range("A1:H8").Value = 20

Cells 属性

可用 Cells(row, column)(其中 row 为行号,column 为列号)返回单个单元格。下例将单元格 A1 赋值为 24(“A”列为数据表上的第二列,“1”行为数据表上的第二行)。

myChart.Application.DataSheet.Cells(2, 2).Value = 24

虽然也可用 Range("A1") 返回单元格 A1,但有时用 Cells 属性更为方便,因为使用该属性时,可用变量指定行和列。下例在数据表上创建行列标题。

Sub SetUpTable()
With myChart.Application.DataSheet
    For theYear = 1 To 5
        .Cells(1, theYear + 1).Value = 1990 + theYear
    Next theYear
    For theQuarter = 1 To 4
        .Cells(theQuarter + 1, 1).Value = "Q" & theQuarter
    Next theQuarter
End With
End Sub

虽然可用 Visual Basic 字符串函数转换 A1 样式的引用,但使用 Cells(1, 1) 记号更为简便(而且也是更好的编程习惯)。

可用 expression.Cells(row, column) 返回单元格区域中的一部分,其中 expression 是返回 Range 对象的表达式,rowcolumn 为相对于该区域左上角的偏移量。下例设置单元格 C5 的值。

myChart.Application.Range("C5:C10").Cells(1, 1).Value = 35