¿Cómo ocultar o mostrar filas o columnas específicas al hacer doble clic en una celda en Excel?

Normalmente, las filas y columnas se pueden ocultar o mostrar haciendo clic derecho y seleccionando la opción Ocultar o Mostrar en el menú contextual. En este artículo, hablamos sobre cómo ocultar o mostrar rápidamente filas o columnas específicas haciendo doble clic en una celda en Excel.

Ocultar o mostrar filas o columnas específicas al hacer doble clic en una celda con código VBA

Ocultar o mostrar filas o columnas específicas al hacer doble clic en una celda con código VBA

El siguiente código VBA puede ayudarte a ocultar o mostrar rápidamente filas o columnas específicas en una hoja de cálculo haciendo doble clic en una celda determinada. Por favor, sigue los siguientes pasos.

1. Abre la hoja de cálculo donde deseas ocultar filas o columnas. Haz clic derecho en la pestaña de la hoja y luego haz clic en Ver código en el menú contextual.

2. En la ventana abierta de Microsoft Visual Basic para Aplicaciones, copia uno de los siguientes códigos VBA que necesites en la ventana de Código.

VBA: Ocultar/mostrar filas específicas haciendo doble clic en celdas en la hoja de cálculo:

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 específicas haciendo doble clic en celdas en la hoja de cálculo:

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

Nota: En el código, A1:A4, 10:13 y D:E indican que al hacer doble clic en cualquier celda del rango A1:A4, la fila 10:13 o la columna D:E se ocultará automáticamente.

3. Presiona las teclas Alt + F11 para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.

Desde ahora, al hacer doble clic en cualquier celda del rango A1:A4, la fila 10:13 o la columna D:E se ocultará automáticamente. Y al hacer doble clic nuevamente en la celda, todas las filas o columnas ocultas se mostrarán inmediatamente.

Artículos relacionados:

• ¿Cómo hacer clic o doble clic en una 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 sumar 1 al valor de esa celda en Excel?
• ¿Cómo hacer aparecer un calendario al hacer clic en una celda específica en Excel?