форматировать строку ячеек и соответствующую родительскую строку в сводной таблице в Excel, используя vba - PullRequest
0 голосов
/ 09 января 2019

У меня есть сводная таблица в Classic Pivot Table Layout. Я хочу выделить определенные ячейки и их родительские заголовки строк, когда условие является истинным для ячейки в столбце в диапазоне данных. Чтобы проиллюстрировать то, чего я пытаюсь достичь, смотрите изображение ниже. Я вручную выделил поле 1 на данный момент, где сумма ошибок> 0. введите описание изображения здесь

Пока у меня есть этот код, который может форматировать строки, которые имеют фактические значения, но как мне найти их родителей?

Sub FormatPivot()
    'Clear Formatting

    With ThisWorkbook.Worksheets("Sheet1").PivotTables("PivotTable3")

        For Each c In .PivotFields("Sum of Errors").DataRange.Cells
        If (c.Value2 > 0) Then
            'Z = c.PivotIte
            With .TableRange1.Rows(c.Row - .TableRange1.Row + 1)
              .Font.Bold = True
              .Interior.ColorIndex = 44
            End With
        End If
        Next
    End With

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...