Как отключить выбор нескольких элементов в сводной таблице?
Когда мы создаем сводную таблицу и устанавливаем параметр отфильтрованных элементов, но вы не хотите, чтобы другие применяли функцию «Выбрать несколько элементов» в сводной таблице, чтобы нарушить исходные данные в вашей сводной таблице. В этой статье я расскажу о том, как отключить эту опцию в сводной таблице.
Отключить выбор нескольких элементов в сводной таблице с кодом VBA
Отключить выбор нескольких элементов в сводной таблице с кодом VBA
Чтобы защитить выбор сводной таблицы от изменения, следующий код VBA может помочь вам отключить функцию выбора нескольких элементов. Пожалуйста, сделайте следующее:
1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.
2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.
Код VBA: отключить выбор нескольких элементов в сводной таблице
Sub DisableSelection()
'Update 20141028
Dim xPF As PivotField
Set xPT = Application.ActiveSheet.PivotTables(1)
For Each xPF In xPT.PivotFields
xPF.EnableItemSelection = False
Next xPF
End Sub
3, Затем нажмите F5 клавишу для запуска этого кода, а кнопки со стрелками фильтра в сводной таблице были сразу удалены, см. скриншоты:
 |
 |
 |
Ноты:
1. Если вы хотите снова включить функцию выбора нескольких элементов, примените следующий код:
Код VBA: включить выбор нескольких элементов в сводной таблице:
Sub DisableSelection()
'Update 20141028
Dim xPF As PivotField
Set xPT = Application.ActiveSheet.PivotTables(1)
For Each xPF In xPT.PivotFields
xPF.EnableItemSelection = True
Next xPF
End Sub
2. Этот код применяется только к одной сводной таблице на активном листе.
Статьи по теме:
Как скрыть кнопки разворачивания и сворачивания в сводной таблице?
Как скрыть промежуточные итоги в сводной таблице?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
