Свойство PivotCell.CustomSubtotalFunction (Excel)

Возвращает параметр поля настраиваемой функции промежуточных итогов объекта PivotCell . XlConsolidationFunction только для чтения.

Синтаксис

expression. CustomSubtotalFunction

Выражение Переменная, представляющая объект PivotCell .

Замечания

Свойство CustomSubtotalFunction возвращает ошибку, если тип объекта PivotCell не является пользовательским промежуточным итогом. Это свойство применяется только к исходным данным, отличным от OLAP.

Пример

В этом примере определяется, содержит ли ячейка C20 пользовательскую функцию промежуточных итогов, которая использует функцию консолидации count, а затем уведомляет пользователя. В примере предполагается, что на активном листе существует сводная таблица.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.