En Excel, Ocultar filas que cumplen con el criterio

Necesitaria generar una macro, que de las filas 20 a 31 de la columna B.

Me chequee si la celda contiene "* ", si contiene el asterisco, Que dicha fila se oculte.

De lo contrario que la deje visible y continue con las demás hasta terminar el rango de celdas solicitado.

Ya intente con lo poco que se de macros en excel, y no lo consegui...

1 respuesta

Respuesta
1

H o l a:

Te anexo la macro

Sub OcultarFilas()
'Por.Dante Amor
    Set r = Range("B20:B31")
    r.EntireRow.Hidden = False
    Set b = r.Find("~*", lookat:=xlPart)
    If Not b Is Nothing Then
        ncell = b.Address
        Do: Rows(b.Row).Hidden = True
            Set b = r.FindNext(b)
        Loop While Not b Is Nothing And b.Address <> ncell
    End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas