Cómo ocultar líneas a través de VBA si una celda tiene cierto contenido
¿Le gustaría ocultar automáticamente todas las líneas con un determinado contenido usando una macro? Imagine que desea ocultar todas las líneas si el texto "ocultar" aparece en cualquier celda de la línea correspondiente. Esta puede ser una aplicación útil para limpiar datos. Eche un vistazo a la situación inicial en la siguiente tabla:
En esta tabla, queremos ocultar todas las filas que contienen celdas que contienen un cero. Utilice la siguiente macro:
Ocultar líneas específicas ()
Atenuar celda como rango
Para cada celda de ActiveSheet.UsedRange
Si Cell.Value = 0 And Rows (Cell.Row) .Hidden = False _
Luego Rows (cell.Row) .Hidden = True
Siguiente celda
End Sub
Si inicia la macro con, algunas líneas quedarán completamente ocultas, como se muestra en la siguiente figura
En cada una de estas líneas, el texto "ocultar" aparece en alguna columna. Si desea verificar otro criterio en lugar de este contenido, ajuste la comparación correspondiente en la macro.
Para volver a mostrar todas las celdas, presione la combinación de teclas CTRL A y luego seleccione la función INICIO - FORMATO - FADE OUT & FADE IN - SHOW LINES (Excel 2007 y Excel 2010) o FORMAT LINE - FADE IN (Excel hasta la versión 2003). Alternativamente, puede usar la siguiente macro para aparecer:
Mostrar subtodos
Cells.Rows.Hidden = Falso
End Sub
Para ingresar una de las macros, presione la combinación de teclas ALT F11 en Excel. Esto llama al editor de VBA. Utilice el comando INSERTAR - MÓDULO para insertar una hoja de módulo vacía. Para iniciar una de las macros, presione la combinación de teclas ALT F8 dentro de Excel.
