Поделиться через


Worksheet.PivotTables Метод (2007 System)

Обновлен: Ноябрь 2007

Возвращает объект, представляющий либо отдельный отчет сводной таблицы (объект Microsoft.Office.Interop.Excel.PivotTable), либо коллекцию всех отчетов сводных таблиц (коллекция Microsoft.Office.Interop.Excel.PivotTables) на рабочем листе.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
Public Function PivotTables ( _
    Index As Object _
) As Object
'Применение
Dim instance As Worksheet
Dim Index As Object
Dim returnValue As Object

returnValue = instance.PivotTables(Index)
public Object PivotTables(
    Object Index
)

Параметры

  • Index
    Тип: System.Object
    Имя или номер отчета.

Возвращаемое значение

Тип: 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
        Dim i As Integer
        For i = 0 To pivotTables1.Count
            pivotTables1.Item(i).RefreshTable()
        Next i
    Else
        MsgBox("This workbook contains no pivot tables.")
    End If
End Sub
private void RefreshPivotTables()
{
    Excel.PivotTables pivotTables1 = 
        (Excel.PivotTables)this.PivotTables(missing);

    if (pivotTables1.Count > 0)
    {
        for (int i = 0; i <= pivotTables1.Count; i++)
        {
            pivotTables1.Item(i).RefreshTable();
        }
    }
    else
    {
        MessageBox.Show("This workbook contains no pivot tables.");
    }
}

Разрешения

См. также

Ссылки

Worksheet Класс

Worksheet - члены

Microsoft.Office.Tools.Excel - пространство имен