Classe CubeField (Excel VBA)

La classe CubeField représente un champ de hiérarchie ou de mesure d'un cube OLAP.

Les procédures principales de la classe CubeField sont AddMemberPropertyField, Delete et CubeFields.AddSet

Set

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

Dim cbf as CubeField
Set cbf = ActiveCell.PivotField.CubeField

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe CubeField : CubeFields.Item, CubeFields.AddSet, CubeFields.GetMeasure, PivotField.CubeField, PivotFilter.DataCubeField et PivotTable.CubeFields

For Each

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

Dim cbf As CubeField
For Each cbf In ActiveCell.CubeFields
	
Next cbf

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 AddMemberPropertyField et CubeFields.AddSet
Cube with its procedures CubeFieldSubType et CubeFieldType

Méthodes

Les méthodes principales de la classe CubeField sont

Delete - Cette méthode supprime l'objet.

ActiveCell.PivotField.CubeField.Delete

Autre Méthodes

AutoGroup - Regroupe automatiquement les champs de cube dans un cube OLAP, de manière optionnelle selon l’orientation spécifiée et/ou dans la position spécifiée.

ClearManualFilter - La méthode ClearManualFilter offre un moyen simple de définir la propriété visible sur true pour tous les éléments d'un champ PivotField dans les tableaux croisés dynamiques et de vider les collections HiddenItemsList/VisibleItemsList dans OLAP PivotTables.

CreatePivotFields - La méthode CreatePivotFields permet aux utilisateurs d'appliquer un filtre aux champs PivotFields qui n'ont pas encore été ajoutés au tableau croisé dynamique en créant l'objet PivotField correspondant.

CubeFields.GetMeasure - Étant donné une hiérarchie d'attribut, renvoie une mesure implicite pour la fonction donnée qui correspond à cet attribut. Si aucune mesure implicite n'existe, une nouvelle mesure implicite est créée et ajoutée à la collection CubeFields .

Propriétés

AllItemsVisible La propriété AllItemsVisible vérifie si le filtrage manuel est appliqué à un champ de tableau croisé dynamique ou à un champ de cube. Boolean (en lecture seule).

Dim booAllItemsVisible As Boolean
booAllItemsVisible = ActiveCell.PivotField.CubeField.AllItemsVisible

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

ActiveCell.PivotField.CubeField.Caption =

CurrentPageName Renvoie ou définit le nom de page d’un champ de cube. String en lecture/écriture.

ActiveCell.PivotField.CubeField.CurrentPageName =

DragToColumn True si le champ spécifié peut être déplacé par glissement vers la position de la colonne. La valeur par défaut est True. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.DragToColumn = True

DragToData Cette propriété renvoie la valeur True si le champ spécifié peut être déplacé par glissement vers la position des données. La valeur par défaut est True. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.DragToData = True

DragToHide True si le champ peut être masqué en le glissant hors du rapport de tableau croisé dynamique. La valeur par défaut est True. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.DragToHide = True

DragToPage Cette propriété renvoie la valeur True si le champ peut être déplacé par glissement vers la position de la page. La valeur par défaut est True. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.DragToPage = True

DragToRow True si le champ peut être déplacé par glissement vers la position de la ligne. La valeur par défaut est True. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.DragToRow = True

EnableMultiplePageItems True pour que plusieurs éléments de la zone du champ de la page puissent être sélectionnés dans les tableaux croisés dynamiques OLAP. La valeur par défaut est False. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.EnableMultiplePageItems = True

FlattenHierarchies Renvoie ou définit une valeur indiquant si les éléments de tous les niveaux des hiérarchies dans un champ de cube de jeu nommé sont affichés dans le même champ qu’un rapport de tableau croisé dynamique reposant sur un cube OLAP. Lecture-écriture.

ActiveCell.PivotField.CubeField.FlattenHierarchies = True

HasMemberProperties Cette propriété renvoie la valeur True lorsque des propriétés membre sont spécifiées pour être affichées pour le champ de cube. Boolean (en lecture seule).

Dim booHasMemberProperties As Boolean
booHasMemberProperties = ActiveCell.PivotField.CubeField.HasMemberProperties

HierarchizeDistinct Cette propriété renvoie ou définit si les doublons doivent être triés et supprimés lors de l'affichage du jeu nommé spécifié dans un rapport de tableau croisé dynamique basé sur un cube OLAP. Lecture-écriture.

ActiveCell.PivotField.CubeField.HierarchizeDistinct = True

IncludeNewItemsInFilter La propriété IncludeNewItemsInFilter permet de suivre la trace des éléments inclus/exclus dans les tableaux croisés dynamiques OLAP. Lecture-écriture.

ActiveCell.PivotField.CubeField.IncludeNewItemsInFilter = True

IsDate Renvoie True si le champ de cube est une date. Boolean (en lecture seule).

Dim booIsDate As Boolean
booIsDate = ActiveCell.PivotField.CubeField.IsDate

LayoutForm Renvoie ou définit la manière dont les éléments du tableau croisé dynamique spécifiés s’affichent (sous la forme d’un tableau ou d’un plan). En lecture/écriture XlLayoutFormType.

ActiveCell.PivotField.CubeField.LayoutForm = xlOutline

LayoutSubtotalLocation Renvoie ou définit la position des sous-totaux d’un champ de tableau croisé dynamique par rapport au champ spécifié (au-dessus ou au-dessous). En lecture/écriture XlSubtotalLocationType.

ActiveCell.PivotField.CubeField.LayoutSubtotalLocation = xlAtBottom

Name Renvoie une valeur de type String qui représente le nom de l'objet.

Dim strName As String
strName = ActiveCell.PivotField.CubeField.Name

Orientation Cette propriété renvoie ou définit une valeur XlPivotFieldOrientation qui représente l'emplacement du champ dans le rapport de tableau croisé dynamique spécifié.

ActiveCell.PivotField.CubeField.Orientation = xlColumnField

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

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

PivotFields Renvoie la collection PivotFields . Cette collection contient tous les champs de tableau croisé dynamique, y compris ceux qui ne sont pas actuellement visibles à l'écran. Objet PivotFields en lecture seule.

Dim pfsPivotFields As PivotFields
Set pfsPivotFields = ActiveCell.PivotField.CubeField.PivotFields

Position Cette propriété renvoie ou définit une valeur de type long qui représente la position du champ de hiérarchie dans le rapport de tableau croisé dynamique lorsqu'il est déplacé à partir du champ bien.

ActiveCell.PivotField.CubeField.Position =

ShowInFieldList Lorsque cette propriété a la valeur True (par défaut), un objet CubeField est affiché dans la liste de champs. Boolean (en lecture/écriture).

ActiveCell.PivotField.CubeField.ShowInFieldList = True

TreeviewControl Renvoie l'objet TreeviewControl de l'objet CubeField , qui représente le contrôle de manipulation de cube d'un rapport de tableau croisé dynamique OLAP. En lecture seule.

Dim tclTreeviewControl As TreeviewControl
Set tclTreeviewControl = ActiveCell.PivotField.CubeField.TreeviewControl

Value Cette propriété renvoie une valeur de type String qui représente le nom du champ spécifié.

Dim strValue As String
strValue = ActiveCell.PivotField.CubeField.Value

CubeFields.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.PivotTable.CubeFields.Count

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

Dim cbfItem As CubeField
Set cbfItem = ActiveCell.PivotTable.CubeFields(Index:=1)

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

Dim objParent As Object
Set objParent = ActiveCell.PivotTable.CubeFields.Parent