Страницы: 1
RSS
Как определить название поля сводной таблицы
 
Добрый день,
при работе со сводной таблицей не очень удобно работать с фильтром (отключать не нужные строки), хочу сделать отключение через макрос.

Идея работы следующая: выделил ячейку - щелкнул кнопку  
Как определить имя сводной таблицы через активную ячейку нашел, а вот как узнать имя поля?

В примере это "Наименование и техническая  характеристика" прямое указание, а надо получить имя поля по Активной ячейке.
Заранее спасибо.

Код
Sub test()

Set pvtTable = ActiveCell.PivotTable

With ActiveSheet.PivotTables(pvtTable.Name).PivotFields("Наименование и техническая  характеристика")
        .PivotItems(ActiveCell.Value).Visible = False
End With



End Sub
 
Код
Sub test()
  Dim pf As PivotField
  Set pf = ActiveCell.PivotCell.PivotField
  Debug.Print pf.Name
End Sub
Владимир
 
sokol92, спасибо огромное! А в какой справке такое написано? нигде найти не мог.
 
Здесь и далее по ссылке.
Владимир
 
Спасибо.
 
Успехов!
Владимир
Страницы: 1
Наверх