Classe ModelMeasures (Excel VBA)

A classe ModelMeasures representa uma coleção de objetos ModelMeasure . Para usar uma variável de classe ModelMeasures, ela primeiro precisa ser instanciada por exemplo

Dim mms as ModelMeasures
Set mms = ActiveWorkbook.Model.ModelMeasures

For Each

Aqui está um exemplo de processamento dos itens ModelMeasures em uma coleção.

Dim mme As ModelMeasure
For Each mme In ActiveWorkbook.Model.ModelMeasures
	
Next mme

Add

Adiciona uma medida de modelo ao modelo.

A formatação da medida do modelo pode ser do tipo:

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

O seguinte argumento é opcional

MeasureName (String) - O nome da medida de modelo.

AssociatedTable (ModelTable) - A tabela de modelo associada à medida de modelo. Esta é a tabela que contém a medida do modelo, como visto no painel de tarefas lista de campos .

Formula (String) - A fórmula DAX (expressões de análise de dados), inserida como uma cadeia de caracteres.

FormatInformation (Model) - A formatação da medida do modelo. Consulte Comentários.

Optional arguments

The following argument is optional

Description (String) - A descrição associada à medida do modelo.

Count

Retorna um inteiro que representa o número de objetos na coleção.

Dim lngCount As Long
lngCount = ActiveWorkbook.Model.ModelMeasures.Count

Item

Retorna um único objeto de uma coleção.

Item (Index)

Index: O nome ou número de índice do objeto.

Dim mme As ModelMeasure
Set mme = ActiveWorkbook.Model.ModelMeasures(Index:=1)