Este fórum está sendo desativado

[Wieniawski]

Srs, é possível fazer uma formatação condicional de acordo com a cor de preenchimento da célula?

Ou seja, células com preenchimento azul formatar a fonte em branco.

[Wieniawski]

Fiz este código, ele altera algumas células, porém quando coloco um intervalo grande conforme abaixo, não funciona:

Sub muda_cor()

If Range("e68:f85").Interior.ColorIndex = 23 Then

Range("e68:f85").Font.Color = vbWhite

End If


End Sub

[osvaldomp]

Código: Selecionar todos

Sub muda_cor()
 Dim c As Range
  For Each c In Range("E68:F85")
   If c.Interior.ColorIndex = 23 Then c.Font.Color = vbWhite
  Next c
End Sub

[Wieniawski]

Deu certo!!

Mais uma vez, muito obrigado Osvaldo!!

abç!