Código que elimine colores en columnas

Tengo cierta información entre las columnas "a:cy", y parte de ella tiene celdas con color

Y lo que quisiera es que de acuerdo al rango anterior me quitara los colores dejando todo como estaba antes sin color

2 Respuestas

Respuesta
1

[Hola 

Prueba con esto


Finaliza la respuesta valorando

Sub quita_color()
    For Each r In Range("A1:Cy1000")
        r.Interior.ColorIndex = xlNone
    Next r
End Sub
Respuesta
2

Prueba con esta macro

Sub BORRAR_COLORES()
Range("A:CY").Interior.ColorIndex = xlNone
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas