Метод PivotTable.PivotValueCell (Excel)
Получите объект PivotValueCell для заданной сводной таблицы с определенными индексами строк и столбцов.
Синтаксис
expression. PivotValueCell (RowLine, ColumnLine)
Выражение Переменная, представляющая объект сводной таблицы .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
RowLine | Необязательный | Variant | Если имеет тип PivotLine, указывает сводную линию в области строки, с которым выравнивается PivotValueCell . Если имеет тип Int, указывает положение сводной линии в области строк, с которым выравнивается PivotValueCell . Если значение отсутствует, значение Empty, Null или 0 указывает строку общего итога. |
ColumnLine | Необязательный | Variant | Если имеет тип PivotLine, указывает сводную линию в области столбца, с которым выравнивается PivotValueCell . Если имеет тип Int, указывает положение сводной линии в области столбца, с которым выравнивается PivotValueCell . Если значение отсутствует, значение Пусто, Null или 0 указывает столбец с общим итогом. |
Возвращаемое значение
PIVOTVALUECELL
Пример
В этом примере кода свойство PivotValueCell используется для проверки того, больше ли значение одной ячейки в сводной таблице, чем значение другой ячейки.
Sub TestEquality()
Dim X As Double
Dim Y As Double
'This code assumes you have a Standalone PivotChart on one of the worksheets
X = ThisWorkbook.PivotTables(1).PivotValueCell(1, 1).Value
Y = ThisWorkbook.PivotTables(1).PivotValueCell(1, 2).Value
If X > Y Then
MsgBox "X is greater than Y"
Else
MsgBox "Y is greater than X"
End If
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.