¿Cómo deshabilitar la selección de varios elementos en una tabla dinámica?

Cuando creamos una tabla dinámica y configuramos la opción de elementos filtrados, pero no deseas que otros utilicen la función Seleccionar varios elementos en la tabla dinámica para alterar los datos originales. En este artículo, hablaré sobre cómo deshabilitar esta opción en la tabla dinámica.

Deshabilitar la selección de varios elementos en una tabla dinámica con código VBA

Deshabilitar la selección de varios elementos en una tabla dinámica con código VBA

Para proteger la selección de la tabla dinámica de ser modificada, el siguiente código VBA puede ayudarte a deshabilitar la función Seleccionar varios elementos. Por favor, sigue estos pasos:

1. Mantén presionadas las teclas ALT + F11, y se abrirá la ventana Microsoft Visual Basic para Aplicaciones.

2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.

Código VBA: Deshabilitar la selección de varios elementos en una tabla dinámica

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. Luego presiona la tecla F5 para ejecutar este código, y los botones de flecha de filtro en la tabla dinámica se habrán eliminado de inmediato, ver capturas de pantalla:

Notas:

1. Si deseas volver a habilitar la opción Seleccionar varios elementos, por favor aplica el siguiente código:

Código VBA: Habilitar la selección de varios elementos en una tabla dinámica:

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. Este código solo se aplica a una tabla dinámica en la hoja de cálculo activa.

Artículos relacionados:

¿Cómo ocultar los botones de expandir/colapsar en una tabla dinámica?

¿Cómo ocultar los subtotales en una tabla dinámica?