Как привязать фильтр сводной таблицы к определенной ячейке в Excel?
Если вы хотите связать фильтр сводной таблицы с определенной ячейкой и настроить фильтрацию сводной таблицы на основе значения ячейки, метод, описанный в этой статье, может вам помочь.
Свяжите фильтр сводной таблицы с определенной ячейкой с кодом VBA
Свяжите фильтр сводной таблицы с определенной ячейкой с кодом VBA
Сводная таблица, которую вы свяжете с функцией фильтрации со значением ячейки, должна включать поле фильтра (имя поля фильтра играет важную роль в следующем коде VBA).
Возьмем в качестве примера приведенную ниже сводную таблицу. Поле фильтра в сводной таблице называется Категории, и включает в себя два значения:Расходы(Основной ключ) и Продажа». После связывания фильтра сводной таблицы с ячейкой значения ячеек, которые вы примените к фильтру сводной таблицы, должны быть «Расходы» и «Продажи».
1. Пожалуйста, выберите ячейку (здесь я выбрал ячейку H6), которую вы свяжете с функцией фильтра сводной таблицы, и заранее введите одно из значений фильтра в ячейку.
2. Откройте рабочий лист, содержащий сводную таблицу, которую вы свяжете с ячейкой. Щелкните правой кнопкой мыши вкладку листа и выберите Просмотреть код из контекстного меню. Смотрите скриншот:
3. в Microsoft Visual Basic для приложений окно, скопируйте ниже код VBA в окно кода.
Код VBA: привязать фильтр сводной таблицы к определенной ячейке
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
Dim xPTable As PivotTable
Dim xPFile As PivotField
Dim xStr As String
On Error Resume Next
If Intersect(Target, Range("H6")) Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
Set xPFile = xPTable.PivotFields("Category")
xStr = Target.Text
xPFile.ClearAllFilters
xPFile.CurrentPage = xStr
Application.ScreenUpdating = True
End Sub
Заметки:
4. нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений окно.
Теперь функция фильтрации сводной таблицы связана с ячейкой H6.
Обновите ячейку H6, затем соответствующие данные в сводной таблице будут отфильтрованы на основе существующего значения. Смотрите скриншот:
При изменении значения ячейки отфильтрованные данные в сводной таблице будут изменены автоматически. Смотрите скриншот:
Легко выбирать целые строки на основе значения ячейки в столбце сертификата:
Ассоциация Выбрать определенные ячейки полезности Kutools for Excel может помочь вам быстро выбрать целые строки на основе значения ячейки в столбце Certian в Excel, как показано ниже. После выбора всех строк на основе значения ячейки вы можете вручную переместить или скопировать их в новое место в Excel.
Скачайте и попробуйте прямо сейчас! (30-дневный бесплатный пробный период)
Статьи по теме:
- Как объединить несколько листов в сводную таблицу в Excel?
- Как создать сводную таблицу из текстового файла в Excel?
- Как отфильтровать сводную таблицу на основе определенного значения ячейки в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!