¿Cómo agrupar y desagrupar filas en una hoja de cálculo protegida?

Como todos sabemos, en una hoja de cálculo protegida, hay muchas limitaciones para aplicar algunas operaciones. Por ejemplo, no podemos alternar entre datos agrupados y desagrupados. ¿Existe alguna manera de agrupar o desagrupar filas en una hoja de cálculo protegida?

Agrupar y desagrupar filas en una hoja de cálculo protegida con código VBA

Agrupar y desagrupar filas en una hoja de cálculo protegida con código VBA

Quizás, no haya otra buena manera de resolver este problema más que utilizando un código VBA; por favor, sigue los siguientes pasos:

1. Activa la hoja de cálculo que deseas usar, asegúrate de que la hoja de cálculo aún no esté protegida.

2. Luego, mantén presionadas las teclas ALT + F11, y se abrirá la ventana de Microsoft Visual Basic para Aplicaciones.

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

Código VBA: Agrupar y desagrupar filas en una hoja de cálculo protegida

Sub EnableOutlining()
'Updateby Extendoffice
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
Dim xPws As String
xPws = Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
End Sub

4. Luego presiona la tecla F5 para ejecutar este código, y aparecerá un cuadro de diálogo para recordarte que ingreses la contraseña para proteger la hoja de cálculo actual. Ver captura de pantalla:

5. Luego haz clic en Aceptar, tu hoja de cálculo ha sido protegida, pero puedes expandir y contraer los símbolos de esquema en esta hoja de cálculo protegida, ver captura de pantalla:

Nota: Si tu hoja de cálculo ya está protegida, este código no funcionará.