¿Cómo agrupar y desagrupar filas en una hoja de trabajo protegida?
Como todos sabemos, en una hoja de trabajo protegida, existen muchas limitaciones para que apliquemos algunas operaciones. Por ejemplo, no podemos alternar entre datos agrupados y no agrupados. ¿Hay alguna forma de agrupar o desagrupar filas en una hoja de trabajo protegida?
Agrupar y desagrupar filas en una hoja de trabajo protegida con código VBA
Agrupar y desagrupar filas en una hoja de trabajo protegida con código VBA
Tal vez, no hay otra buena manera de resolver este problema, pero usando un código VBA, haga lo siguiente:
1. Active la hoja de trabajo que desea usar, asegúrese de que la hoja de trabajo aún no esté protegida.
2. Luego mantenga presionado el ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para aplicaciones.
3. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: agrupe y desagrupe filas en una hoja de trabajo protegida
Sub EnableOutlining()
'Update 20140603
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. Entonces presione F5 para ejecutar este código, y aparecerá un cuadro emergente para recordarle que ingrese la contraseña para proteger la hoja de trabajo actual. Ver captura de pantalla:
5. Luego haga clic OK, su hoja de trabajo ha sido protegida, pero puede expandir y contraer los símbolos de contorno en esta hoja de trabajo protegida, vea la captura de pantalla:
Note: Si su hoja de trabajo ya está protegida, este código no funcionará.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!