Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Коллекция всех объектов PivotItem в поле сводной таблицы.
Замечания
Элементы представляют собой отдельные записи данных в категории полей.
Пример
Используйте метод PivotItems объекта PivotField , чтобы вернуть коллекцию PivotItems .
В следующем примере создается список имен полей и элементов, содержащихся в этих полях для первого отчета сводной таблицы на листе 4.
Worksheets("sheet4").Activate
With Worksheets("sheet3").PivotTables(1)
c = 1
For i = 1 To .PivotFields.Count
r = 1
Cells(r, c) = .PivotFields(i).Name
r = r + 1
For x = 1 To .PivotFields(i).PivotItems.Count
Cells(r, c) = .PivotFields(i).PivotItems(x).Name
r = r + 1
Next
c = c + 1
Next
End With
Используйте PivotItems (index), где index — это номер или имя индекса элемента, чтобы вернуть один объект PivotItem . В следующем примере скрываются все записи в первом отчете сводной таблицы на листе 3, которые содержат "1998" в поле Year.
Worksheets("sheet3").PivotTables(1) _
.PivotFields("year").PivotItems("1998").Visible = False
Методы
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.