EXCEL: форматирование ячеек на основе стиля соседней сводной таблицы

Question

Я пытаюсь разработать отчет, который в основном представляет собой сводную таблицу, но с рядом смежных ячеек для некоторых других (не сводных таблиц) текстовых значений.

Каждую неделю обновляется сводная таблица, и строки с подзаголовками и т. Д. Будут перемещаться в зависимости от базовых данных.

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

Кто-нибудь знает, как заставить ячейки наследовать 'стиль' форматирования сводной таблицы, пожалуйста?

Вот иллюстрация того, чего я пытаюсь достичь:

Заранее спасибо!

Answer 1

Попробуйте что-то вроде этого в модуле Workbook:

Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable)
    Dim c As Range
    With Target.DataBodyRange
        Set c = .Columns(.Columns.Count)
    End With
    With c.End(xlToRight)
        .CurrentRegion.ClearFormats
        c.Copy
        .PasteSpecial Paste:=xlPasteFormats
        Application.CutCopyMode = False
    End With
End Sub

Answer 2

Вы можете создать именованный список основных категорий в первом столбце сводной таблицы ({ACC, ACT, BAS и т. Д.}).Предполагая, что [ACC] находится в ячейке A5, вы используете следующую формулу для условного форматирования не сводной таблицы:

=IFERROR(MATCH(A5,Named_List,0),0)>0