Порядок сводной таблицы Excel 2013

Question

У меня есть книга, в которой есть несколько сводных таблиц, рассчитывающих% соответствия на основе строк данных. Каждый раз, когда я обновляю строки данных и обновляю сводные таблицы, процент соответствия будет изменяться. Я хочу, чтобы сводные таблицы были отсортированы от наименьшего% к наибольшему%. В настоящее время я щелкаю каждую сводную таблицу и располагаю ее в порядке сортировки при каждом обновлении книги.

Есть ли способ установить сводные таблицы на ВСЕГДА сортировать значение от А до Z при обновлении?

Answer 1

Если вы хотите автоматизировать процесс обновления и сортировки для всех сводных таблиц, когда бы вы ни вводили данные ENTER или UPDATE, вам может помочь приведенный ниже код VBA.

    Private Sub Worksheet_Change(ByVal Target As Range)
     Dim Wrkst As Excel.Worksheet
     Dim PvtBL As Excel.PivotTable

     For Each Wrkst In Application.ActiveWorkbook.Worksheets
        For Each pvtBL In Wrkst.PivotTables
          PvtBL.RefreshTable
            ActiveWorkbook.PivotTables().PivotFields("Sales").AutoSort _
                xlAscending, ActiveSheet.PivotTables(). _
                PivotColumnAxis.PivotLines(1)
        Next pvtBL
    Next Wrkst
 End Sub

NB. Поскольку имя поля не указано, поэтому я предполагаю, что «Продажи как поля для сортировки» можно изменить как вам нужно.

Надеюсь, это поможет вам.