¿Cómo ocultar o mostrar filas o columnas especificadas al hacer doble clic en una celda en Excel?
Normalmente, las filas y columnas se pueden ocultar o mostrar haciendo clic con el botón derecho y seleccionando la opción Ocultar o Mostrar en el menú contextual. En este artículo, estamos hablando de ocultar o mostrar rápidamente filas o columnas específicas haciendo doble clic en una celda en Excel.
Ocultar o mostrar filas o columnas especificadas al hacer doble clic en una celda con código VBA
Ocultar o mostrar filas o columnas especificadas al hacer doble clic en una celda con código VBA
Los siguientes códigos VBA pueden ayudarlo a ocultar o mostrar rápidamente filas o columnas especificadas en una hoja de trabajo haciendo doble clic en una celda determinada. Haz lo siguiente.
1. Abra la hoja de trabajo en la que desea ocultar filas o columnas. Haga clic con el botón derecho en la pestaña de la hoja y luego haga clic en Ver código desde el menú contextual.
2. En la apertura Microsoft Visual Basic para aplicaciones ventana, copie el siguiente código VBA en la ventana Código.
VBA: ocultar / mostrar filas especificadas haciendo doble clic en las celdas de la hoja de trabajo:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
Dim xRgHidden As Range
If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
Set xRgHidden = Range("10:13")
xRgHidden.EntireRow.Hidden = Not xRgHidden.EntireRow.Hidden
End If
End Sub
VBA: ocultar/mostrar columnas especificadas haciendo doble clic en las celdas de la hoja de trabajo:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
Dim xRgHidden As Range
If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
Set xRgHidden = Range("D:E")
xRgHidden.EntireColumn.Hidden = Not xRgHidden.EntireColumn.Hidden
End If
End Sub
Note: En el código, A1: A4, 10:13 y DELAWARE indicar que al hacer doble clic en cualquier celda del rango A1:A4, la fila 10:13 o columna D:E se ocultará automáticamente.
3. presione el otro + F11 llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana.
De ahora en adelante, al hacer doble clic en cualquier celda del rango A1:A4, la fila 10:13 o la columna D:E se ocultarán automáticamente. Y haga doble clic en la celda nuevamente para mostrar todas las filas o columnas ocultas inmediatamente.
Artículos relacionados:
- ¿Cómo hacer clic o hacer doble clic en la celda para abrir un formulario de usuario específico en Excel?
- ¿Cómo agregar una marca de verificación en una celda con doble clic en Excel?
- ¿Cómo agregar / ingresar automáticamente la fecha / hora actual en una celda con doble clic en Excel?
- ¿Cómo hacer doble clic en una celda y agregar 1 a ese valor de celda en Excel?
- ¿Cómo abrir un calendario al hacer clic en una celda específica en Excel?
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!