Seleccionar ciertas columnas según su valor

Question

He creado una hoja de cálculo con todas mis consultas.

Quiero seleccionar todas las columnas, por ejemplo con "B". Mi objetivo principal es ver como un resumen rápido, a todas las personas que han reservado. Luego, si quisiera ver todas mis consultas, puedo seleccionar solo las columnas "E" y luego se ocultarán todas mis cancelaciones y reservas.

Answer 1

Entiendo que desea ocultar todas las columnas cuya primera celda no contenga "E" o "B". Esto requiere una macro VBA.

El primer paso es guardar la hoja de cálculo para .xlsmpermitir macros VBA y luego abrirla usando Excel.

Escriba Alt+ F11para abrir el editor VBA. Haga clic derecho en "Sheetl (Sheetl)" o "ThisWorkbook" y seleccione Insertar > Módulo.

Copie y pegue el siguiente texto dentro del editor:

Sub Hide_Columns_Not_A()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "A" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Hide_Columns_Not_E()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "E" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Unhide_All_Columns()
Dim c As Range
For Each c In Range("A1:E1").Cells
    c.EntireColumn.Hidden = False
Next c
End Sub

Importante: Cambie en el texto anterior las tres apariciones de A1:E1 al rango real, que en su caso parece ser al menos A1:U1.

Luego presione Ctrl+ Spara guardar la hoja de cálculo y luego Alt+ Qpara cerrar el editor VBA y regresar a Excel.

A partir de ahora podrá dirigirse alDesarrolladorpanel, haga clic enMacrosque desplegará las tres macros definidas, seleccione la que desee y haga clic Correr.