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
做為表格輸入欄的單一儲存格。
傳回值
備註
藉由變更工作表上某些常數值,使用資料表執行條件式 (what-if) 分析,看看其他儲存格中的值到何種影響。
選擇性參數
如需選擇性參數的詳細資訊,請參閱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 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。