Classe ModelMeasures (Excel VBA)
La classe ModelMeasures représente une collection d’objets propriété modelmeasure . Pour utiliser une variable de classe ModelMeasures, elle doit d'abord être instanciée, par exemple
Dim mms as ModelMeasures
Set mms = ActiveWorkbook.Model.ModelMeasures
For Each
Voici un exemple de traitement des éléments ModelMeasures dans une collection
Dim mme As ModelMeasure
For Each mme In ActiveWorkbook.Model.ModelMeasures
Next mme
Add
Ajoute une mesure modèle dans le modèle.
La mise en forme de la mesure du modèle peut être de type:
Add (MeasureName, AssociatedTable, Formula, FormatInformation, Description)
Dim strMeasureName As String: strMeasureName =
Dim strFormula As String: strFormula =
Dim mme As ModelMeasure
Set mme = ActiveWorkbook.Model.ModelMeasures.Add(MeasureName:=strMeasureName, AssociatedTable:=, Formula:=strFormula, FormatInformation:=)
Arguments
Les arguments nommés :
MeasureName (String) - Le nom de la mesure du modèle.
AssociatedTable (ModelTable) - Table de modèles associée à la mesure du modèle. Il s'agit de la table qui contient la mesure de modèle, comme illustré dans le volet Office liste de champs .
Formula (String) - Formule DAX (Data Analysis Expressions), insérée en tant que chaîne.
FormatInformation (Model) - Mise en forme de la mesure du modèle. Voir les remarques.
Optional arguments
Les arguments suivants sont facultatifs
Description (String) - Description associée à la mesure du modèle.
Count
Cette propriété renvoie un nombre entier qui représente le nombre d’objets de la collection.
Dim lngCount As Long
lngCount = ActiveWorkbook.Model.ModelMeasures.Count
Item
Cette méthode renvoie un seul objet d'une collection.
Item (Index)
Index: Nom ou numéro d'index de l'objet.
Dim mme As ModelMeasure
Set mme = ActiveWorkbook.Model.ModelMeasures(Index:=1)