Clase PivotItems (Excel VBA)

Colección de todos los objetos PivotItem de un campo de tabla dinámica. Para usar una variable de clase PivotItems, primero debe ser instanciado, por ejemplo

Dim pis as PivotItems
Set pis = ActiveCell.PivotField.PivotItems()

Add

Crea un nuevo elemento de tabla dinámica.

Add (Name)

Name: Nombre del nuevo elemento de tabla dinámica.

Worksheets(1).PivotTables(1).PivotItems("Year").Add "1998"

Count

Devuelve un valor Long que representa el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveCell.PivotField.PivotItems.Count

Item

Devuelve un solo objeto de una colección.

El nombre de texto del objeto es el valor de las propiedades Name y Value .

Item (Index)

Index: Número de índice o nombre del objeto.

Dim pvti As PivotItem
Set pvti = ActiveCell.PivotField.PivotItems(Index:=1)