Partager via

Objet PivotLayout (Excel)

  • Article

Cet objet représente la disposition des champs dans un rapport de graphique croisé dynamique.

Exemple

Utilisez la propriété PivotLayout de l’objet Chart pour renvoyer un objet PivotLayout .

L'exemple suivant montre comment créer une liste des noms de champs de tableau croisé dynamique utilisés dans le premier rapport de graphique croisé dynamique.

Sub ListFieldNames 
 
 Dim objNewSheet As Worksheet 
 Dim intRow As Integer 
 Dim objPF As PivotField 
 
 Set objNewSheet = Worksheets.Add 
 
 intRow = 1 
 
 For Each objPF In _ 
 Charts("Chart1").PivotLayout.PivotFields 
 
 objNewSheet.Cells(intRow, 1).Value = objPF.Caption 
 
 intRow = intRow + 1 
 
 Next objPF 
 
End Sub

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.