Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Получите объект 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 и обратная связь.