Graph VBA教程: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对象的表达式,row 和 column 为相对于该区域左上角的偏移量。下例设置单元格 C5 的值。


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

上页:Graph VBA教程:Points集合对象 下页:Graph VBA教程:Series对象

Graph VBA教程:Range对象

Graph VBA教程:Series对象 Graph VBA教程:SeriesCollection集合对象
Graph VBA教程:SeriesLines对象 Graph VBA教程:TickLabels对象
Graph VBA教程:Trendline对象 Graph VBA教程:Trendlines集合对象
Graph VBA教程:UpBars对象 Graph VBA教程:Walls对象
Graph VBA教程:Application属性 Graph VBA教程:ApplyPictToEnd属性
Graph VBA教程:ApplyPictToFront属性 Graph VBA教程:ApplyPictToSides属性
Graph VBA教程:Area3DGroup属性 Graph VBA教程:AutoCorrect属性
Graph VBA教程:AutoScaleFont属性 Graph VBA教程:AutoScaling属性
Graph VBA教程:AutoText属性 Graph VBA教程:AxisBetweenCategories属性
Graph VBA教程:AxisGroup属性 Graph VBA教程:AxisTitle属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号