通过

NamedRange.Table 方法

  • 项目

基于在工作表中定义的输入值和公式创建数据表。

命名空间：  Microsoft.Office.Tools.Excel
程序集：  Microsoft.Office.Tools.Excel（在 Microsoft.Office.Tools.Excel.dll 中）

语法

声明
Function Table ( _
    RowInput As Object, _
    ColumnInput As Object _
) As Object

Object Table(
    Object RowInput,
    Object ColumnInput
)

参数

  • RowInput
    类型：System.Object
    一个要用作表的行输入的单元格。
  • ColumnInput
    类型：System.Object
    一个要用作表的列输入的单元格。

返回值

类型：System.Object

备注

使用数据表执行模拟分析，方法是更改工作表上的某些常数值，以查看其他单元格中的值如何受到影响。

可选参数

有关可选参数的信息，请参见Office 解决方案中的可选参数。

示例

下面的代码示例使用 Table 方法，在 NamedRange 中创建格式化的乘法表。

此示例针对的是文档级自定义项。

    Private Sub CreateTable()
        Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("A1", "K11"), _
            "namedRange1")

        Me.Range("A1").Formula = "=A12*A13"
        Dim i As Integer
        For i = 2 To 11
            CType(Me.Cells(i, 1), Excel.Range).Value2 = i - 1
            CType(Me.Cells(1, i), Excel.Range).Value2 = i - 1
        Next i

        namedRange1.Table(Me.Range("A12"), Me.Range("A13"))
        Dim [region] As Excel.Range = Me.Range("A1").CurrentRegion
        CType([region].Rows(1), Excel.Range).Font.Bold = True
        CType([region].Columns(1), Excel.Range).Font.Bold = True
        CType([region].Columns, Excel.Range).AutoFit()
    End Sub


private void CreateTable()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "K11"],
        "namedRange1");

    this.Range["A1"].Formula = "=A12*A13";
    for (int i = 2; i <= 11; i++)
    {
        ((Excel.Range)this.Cells[i, 1]).Value2 = i - 1;
        ((Excel.Range)this.Cells[1, i]).Value2 = i - 1;
    }

    namedRange1.Table(this.Range["A12"],
        this.Range["A13"]);
    Excel.Range region = this.Range["A1"].CurrentRegion;
    ((Excel.Range)region.Rows[1]).Font.Bold = true;
    ((Excel.Range)region.Columns[1]).Font.Bold = true;
    ((Excel.Range)region.Columns).AutoFit();
}

.NET Framework 安全性

请参见

参考

NamedRange 接口

Microsoft.Office.Tools.Excel 命名空间