Eliminar filas con celdas de cierto formato condicional

Estoy tratando de hacer una macro en donde: si el formato condicional de cada celda de la columna E esta coloreado de rojo ( por el formato condicional ya puesto) elimine esa fila y me deje los demás colores.
Tengo tres colores en esa columna por formatos condicionales (verde, amarillo y rojo tipo semáforo) y con una vez entendido este proceso, creare otra macro (una para cada color)
Uso Exel 2007.
En espera de su valiosa y experta ayuda.

1 Respuesta

Respuesta
1

Utiliza la siguiente macro
Sub cond()'borra filas.por.damFor i = 1 To Range("E" & Rows.Count).End(xlUp).RowIf IsNumeric(Range("E" & i)) And IsNumeric(Range("D" & i)) ThenIf Range("E" & i) < Range("D" & i) * 0.5 ThenRows(i).EntireRow.Deletei = i - 1End IfEnd IfNextEnd Sub
Saludos. Dam
Si es lo que necesitas.

La pregunta no admite más respuestas

Más respuestas relacionadas