Eliminar filas que presenten relleno de color

[ramiroabrego]

Hola, buen día.

El motivo del presente es para solicitar su ayuda, pues deseo hacer una macro que me elimine las filas donde en una celda especifica de esa fila se presente un color de relleno, por ejemplo rojo, más sin embargo desconozco como detectar que una celda tiene relleno.

Si alguien me puede compartir el código que se usa para detectar si una celda tiene relleno, se los agradecería mucho.

gracias.

[Antoni]

Ya que no subes archivo, yo tampoco te lo mando:

Prueba de esta forma, selecciona un rango en el que tengas alguna celda en rojo, y ejecuta la macro:

For Each celda In Selection

   If celda.Interior.Color = VbRed then

      Magbox Celda.Address & " es de color rojo"

   End If

Next 

[/CODE]

[ramiroabrego]

Excelente, ya la detecta, muchísimas gracias. En efecto no subí archivo, porque lo que me interesaba era saber como detectar una celda con relleno.

Nadamas en la 3era linea marcó error pero es porque tienes un error de dedo, es msgbox.

Macro Antonio, te agradesco mucho el haberte tomado el tiempo para contestar mi duda.

Gracias.

- - - - - Mensaje combinado - - - - -

Tema Solucionado