Classe PivotItem (Excel VBA)

Cet objet représente un élément dans un champ de tableau croisé dynamique.

Les procédures principales de la classe PivotItem sont CalculatedItems.Add, Delete et PivotItems.Add

Set

Pour utiliser une variable de classe PivotItem, elle doit d'abord être instanciée, par exemple

Dim pvti as PivotItem
Set pvti = ActiveCell.PivotItem

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe PivotItem : PivotField.CalculatedItems, CalculatedItems.Item, CalculatedItems.Add, PivotCell.PivotItem, PivotField.ChildItems, PivotField.CurrentPage, PivotField.HiddenItems, PivotField.ParentItems, PivotField.VisibleItems, ChildItems, ParentItem, PivotItemList.Item, PivotItems.Item, Range.PivotItem, PivotCell.ColumnItems, PivotCell.RowItems, PivotField.ChildItems, PivotField.HiddenItems, PivotField.ParentItems, PivotField.PivotItems, PivotField.VisibleItems et ChildItems

For Each

Voici un exemple de traitement des éléments PivotItem dans une collection

Dim pvtiCalculatedItem As PivotItem
For Each pvtiCalculatedItem In Application.CalculatedItems()
	
Next pvtiCalculatedItem

Thèmes

Certaines procédures de cette classe ont été regroupées en thèmes et sont décrites sur des pages thématiques séparées

Add with its procedures CalculatedItems.Add et PivotItems.Add
Formula with its procedures Formula et StandardFormula
Name with its procedures SourceName et SourceNameStandard

Méthodes

Les méthodes principales de la classe PivotItem sont

Delete - Cette méthode supprime l'objet.

ActiveCell.PivotItem.Delete

Autre Méthodes

CalculatedItems.Item - Cette méthode renvoie un seul objet d'une collection.

DrillTo - La méthode DrillTo prend en charge l’extraction d’un champ PivotField spécifié à partir d’un objet PivotItem.

PivotItemList.Item - Cette méthode renvoie un seul objet d'une collection.

PivotItems.Item - Cette méthode renvoie un seul objet d'une collection.

Propriétés

CalculatedItems.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

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

CalculatedItems.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.PivotField.CalculatedItems.Parent

Caption Cette propriété renvoie une valeur de type String qui représente le texte de l'étiquette pour l'élément dynamique.

ActiveCell.PivotItem.Caption =

ChildItems Renvoie un objet qui représente soit un seul élément de tableau croisé dynamique (un objet PivotItem ), soit une collection de tous les éléments (un objet PivotItems ) qui sont des enfants de groupe dans le champ spécifié ou des enfants de l’élément spécifié. En lecture seule.

Dim pvtiChildItems As PivotItem
Set pvtiChildItems = ActiveCell.PivotItem.ChildItems

DataRange Renvoie un objet Range comme indiqué dans le tableau suivant. En lecture seule.

Dim rngDataRange As Range
Set rngDataRange = ActiveCell.PivotItem.DataRange

DrilledDown True si l’indicateur du champ de tableau croisé dynamique spécifié ou de l’élément de tableau croisé dynamique est défini sur «percé» (développé ou visible). Boolean (en lecture/écriture).

ActiveCell.PivotItem.DrilledDown = True

IsCalculated True si l’élément de tableau croisé dynamique est un champ ou un élément calculé. Boolean (en lecture seule).

Dim booIsCalculated As Boolean
booIsCalculated = ActiveCell.PivotItem.IsCalculated

LabelRange Renvoie un objet Range qui représente toutes les cellules du rapport de tableau croisé dynamique contenant l’élément. En lecture seule.

Dim rngLabelRange As Range
Set rngLabelRange = ActiveCell.PivotItem.LabelRange

Name Cette propriété renvoie ou définit une valeur de type String qui représente le nom de l'objet.

ActiveCell.PivotItem.Name =

Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim pvtfParent As PivotField
Set pvtfParent = ActiveCell.PivotItem.Parent

ParentItem Renvoie un objet PivotItem qui représente l’élément de tableau croisé dynamique parent dans l’objet PivotField parent (le champ doit être groupé de manière à ce qu’il ait un parent). En lecture seule.

Dim pvtiParentItem As PivotItem
Set pvtiParentItem = ActiveCell.PivotItem.ParentItem

ParentShowDetail True si l’élément spécifié est visible parce qu’un de ses parents affiche les détails. False si l’élément spécifié n’est pas affiché car l’un de ses parents masque les détails. Cette propriété n’est disponible que si l’élément est groupé. Boolean (en lecture seule).

Dim booParentShowDetail As Boolean
booParentShowDetail = ActiveCell.PivotItem.ParentShowDetail

Position Cette propriété renvoie ou définit une valeur de type Long qui représente la position de l'élément dans son champ, si l'élément est actuellement affiché.

ActiveCell.PivotItem.Position =

RecordCount Renvoie le nombre d’enregistrements du cache du tableau croisé dynamique ou le nombre d’enregistrements du cache contenant l’élément spécifié. Type de données Long en lecture seule.

Dim lngRecordCount As Long
lngRecordCount = ActiveCell.PivotItem.RecordCount

ShowDetail True si le plan de la plage spécifiée est étendu (afin que les détails de la colonne ou de la ligne soient visibles). La plage spécifiée doit être une seule colonne ou ligne de synthèse d’un plan. Variant en lecture/écriture. En ce qui concerne l'objet PivotItem (ou l'objet Range si la plage se trouve dans un rapport de tableau croisé dynamique), cette propriété a la valeur True si l'élément affiche les détails.

ActiveCell.PivotItem.ShowDetail = True

Value Cette propriété renvoie ou définit une valeur String qui représente le nom de l'élément spécifié dans le champ de tableau croisé dynamique.

ActiveCell.PivotItem.Value =

Visible Cette propriété renvoie ou définit une valeur de type Boolean qui détermine si l’objet est visible. Lecture-écriture.

ActiveCell.PivotItem.Visible = True

PivotItemList.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveCell.PivotCell.RowItems.Count

PivotItemList.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.PivotCell.RowItems.Parent

PivotItems.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

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

PivotItems.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim pvtfParent As PivotField
Set pvtfParent = ActiveCell.PivotField.PivotItems.Parent