Como seleccionar columna en función de un dato

Tengo una hoja de calulo que dispone de varios número aleatorios en diversas celdas.

Cómo puedo seleccionar la columnas (Para ocultarlas) que no contengan en ninguna de sus celdas el valor 15.

Es decir, si en una columna no existe el valor 15, entonces ocultar.

Respuesta

Esto puede aportar algo más

https://youtu.be/_XvTiwgPHzo

https://youtu.be/M3C5AyDMLOY

en vez de resaltarlo ocultas la columna asi

https://youtu.be/qmPjkMNQvNc

1 respuesta más de otro experto

Respuesta
1

Ejecuta la siguiente macro

Sub Macro4()
'Por Dante Amor
' Ocultar hojas
    u = ActiveSheet.UsedRange.Columns(ActiveSheet.UsedRange.Columns.Count).Column
    ActiveSheet.Cells.EntireColumn.Hidden = False
    For i = 1 To u
        Set b = Columns(i).Find(15, lookat:=xlWhole)
        If b Is Nothing Then
            Columns(i).EntireColumn.Hidden = True
        End If
    Next
    MsgBox "Fin"
End Sub

.

.

.[. No olvides valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas