Table 方法

依据输入值和工作表上定义的公式创建数据表。

expression   必需。该表达式返回“应用于”列表中的一个对象。

RowInput   Variant 类型，可选。用作数据表行输入的单个单元格。

ColumnInput   Variant 类型，可选。用作数据表列输入的单个单元格。

说明

使用数据表，通过更改工作表上特定常量的值，并观察其他单元格相应的变化情况，可进行假设分析。

示例

本示例在工作表 Sheet1 的 A1:K11 单元格中创建一个带格式的乘法运算表。

Set dataTableRange = Worksheets("Sheet1").Range("A1:K11")
Set rowInputCell = Worksheets("Sheet1").Range("A12")
Set columnInputCell = Worksheets("Sheet1").Range("A13")

Worksheets("Sheet1").Range("A1").Formula = "=A12*A13"
For i = 2 To 11
    Worksheets("Sheet1").Cells(i, 1) = i - 1
    Worksheets("Sheet1").Cells(1, i) = i - 1
Next i
dataTableRange.Table rowInputCell, columnInputCell
With Worksheets("Sheet1").Range("A1").CurrentRegion
    .Rows(1).Font.Bold = True
    .Columns(1).Font.Bold = True
    .Columns.AutoFit
End With