共用方式為


WorksheetBase.PivotTables 方法

取得物件,表示工作表上的單一樞紐分析表報表 (Microsoft.Office.Interop.Excel.PivotTable 物件) 或所有樞紐分析表報表的集合 (Microsoft.Office.Interop.Excel.PivotTables 物件)。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)

語法

'宣告
Public Function PivotTables ( _
    index As Object _
) As Object
public Object PivotTables(
    Object index
)

參數

傳回值

型別:System.Object
物件,表示工作表上的單一樞紐分析表報表 (Microsoft.Office.Interop.Excel.PivotTable 物件) 或所有樞紐分析表報表的集合 (Microsoft.Office.Interop.Excel.PivotTables 物件)。

備註

選擇性參數

如需選擇性參數的詳細資訊,請參閱Office 方案中的選擇性參數

範例

下列程式碼範例會使用 PivotTables 方法取得目前工作表的 Microsoft.Office.Interop.Excel.PivotTables 集合,然後重新整理集合中的每一個樞紐分析表。

這是示範文件層級自訂的範例。

Private Sub RefreshPivotTables()
    Dim pivotTables1 As Excel.PivotTables = _
        CType(Me.PivotTables(), Excel.PivotTables)

    If pivotTables1.Count > 0 Then
        For Each table As Microsoft.Office.Interop.Excel.PivotTable _
              In pivotTables1
            table.RefreshTable()
        Next
    Else
        MsgBox("This workbook contains no pivot tables.")
    End If
End Sub
private void RefreshPivotTables()
{
    Excel.PivotTables pivotTables1 = 
        (Excel.PivotTables)this.PivotTables();

    if (pivotTables1.Count > 0)
    {
        foreach (Microsoft.Office.Interop.Excel.PivotTable table
             in pivotTables1)
        {
            table.RefreshTable();
        }
    }
    else
    {
        MessageBox.Show("This workbook contains no pivot tables.");
    }
}

.NET Framework 安全性

請參閱

參考

WorksheetBase 類別

Microsoft.Office.Tools.Excel 命名空間