Ocultar celdas con ciertos criterios

[CESAR25-03-76]

Hola amigos ojala me pueden ayudar en mi tema estoy enviando un archivo y en el estoy especificando lo que deseo en conclucion quiero ocultar un rango de celdas sin que afecte sus formatos y sus formulas para un posterior reporte.

Libro1.xls

[Fleming]

Hola César

Quizás te sirva utilizar Formato Condicional.

Ejemplo:

Supongamos que la 1ª celda de la columna que quieres "hacer invisible" es B5 y que que quieres que "no se vea" el resultado cuando la fórmula da cero (0). Haz lo siguiente:

Selecciona la celda B5

En formato condicional , en valor de la celda, pones =0 y a continuación clic en Fuente, luego en Color y eliges el mismo color del fondo.

Si el fondo es blanco, al dar a la fuente el color blanco, el resultado será que no se verá el cero (0)

Luego Copiar formato hasta donde quieras que se cumpla la condición.

Un saludo

[rulesagain]

Si el valor del rango b5 hasta la b10 tienes cero la macro oculta la fila y si es diferente a cero la muestra

Sub ocultarfilas() 

For Each celda In Range("b5:b10") 

If celda.Value <= 0 Then 

ActiveCell.EntireRow.Hidden = True 

Else 

ActiveCell.EntireRow.Hidden = False 

End If 

ActiveCell.Offset(1).Select 

Next 


End Sub [/CODE]

Saludos