Compartilhar via

Propriedade PivotCell.CustomSubtotalFunction (Excel)

  • Artigo

Retorna uma configuração de campo de função de subtotal personalizado de um objeto PivotCell. XlConsolidationFunction somente leitura.

Sintaxe

expressão. CustomSubtotalFunction

Expressão Uma variável que representa um objeto PivotCell .

Comentários

A propriedade CustomSubtotalFunction retornará um erro se o tipo de objeto PivotCell não for um subtotal personalizado. Essa propriedade se aplica somente a uma fonte de dados não-OLAP.

Exemplo

Este exemplo determina se a célula C20 contém uma função subtotal personalizada que usa uma função de consolidação de contagem e, em seguida, notifica o usuário. O exemplo supõe que exista uma tabela dinâmica na planilha ativa.

Sub UseCustomSubtotalFunction() 
 
 On Error GoTo Not_A_Function 
 
 ' Determine if custom subtotal function is a count function. 
 If Application.Range("C20").PivotCell.CustomSubtotalFunction = xlCount Then 
 MsgBox "The custom subtotal function is a Count." 
 Else 
 MsgBox "The custom subtotal function is not a Count." 
 End If 
 Exit Sub 
 
Not_A_Function: 
 MsgBox "The selected cell is not a custom subtotal function." 
 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.