¿Cómo oculto columnas que tienen valores cero (0) en una de sus filas?

Buenas!
Me intriga saber si alguien me puede ayudar, la situación es la siguiente:
Tengo una hoja en la que hay una gran cantidad de columnas con sumatorias debajo. Lo que quiero lograr es que si la suma que se realizan en la fila 78 de cada columna da como resultado 0, esta se oculte. En total deben ser como 300 columnas.
Vi otros ejemplos parecidos pero no termino de resolverlo, no logro descifrar como tendría que crear el macro para que la columna reconozca el resultado y se oculte.
Si alguien me puede ayudar se agradecerá!
Saludos y gracias!

1 Respuesta

Respuesta
1

Te mando mi solución con esta macro:

Voy a suponer que las sumas están en la fila 78 empezando desde la columna A

Ejecuta esta macro y todo solucionado

Sub ocultar()
'por luismondelo
Range("a78").Select
Do While ActiveCell.Value <> ""
If ActiveCell.Value = 0 Then
ActiveCell.EntireColumn.Hidden = True
ActiveCell.Offset(0, 1).Select
Else
ActiveCell.Offset(0, 1).Select
End If
Loop
End Sub

recuerda finalizar la consulta

Muchas gracias luis por la velocidad de tu respuesta!

Lo probé en una hoja nueva y funciona perfecto, pero lo quise aplicar en la que estoy trabajando y solo me oculta la columna A, igual voy a seguir probando porque debe haber algún error en la hoja.

Gracias nuevamente!

Ah! lo que sucedía era que cuando queda una celda sin valor se corta el macro! listo eso lo soluciono fácilmente.

Muchas gracias nuevamente!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas