Alteração Condicional de Cor de Células

[Glim]

Prezados,

fiz uma tabela muito grande no Excel. Parte de algumas linhas (inclusive intervalo não contínuo) foi preenchida na cor amarela. Acontece que não gostei do visual. Como conheço muito operações com Macros, recorro a vocês para indicar uma Macro capaz de identificar as células amarelas (apenas estas) (color = 65535, TintAndShade = 0) para salmão claro ("ThemeColor = xlThemeColorAccent6" e "TintAndShade = 0.399975585192419").

Desde já agradeço a todos.

Abs.

Glim

[zinhovba]

Boa tarde!!

Essa rotina eliminará a cor amarela, faça os testes

Sub TenteAlgoAssim()
  Application.FindFormat.Clear
  Application.FindFormat.Interior.ColorIndex = 6
  Range("A1:A300").Replace "", "", SearchFormat:=True 'Mude para seu intervalo
  Application.FindFormat.Clear
End Sub

Att

[Glim]

Ok, mas as mesmas células que estavam amarelas devem mudar para outra cor.

Grato.

[zinhovba]

Boa tarde!!

Então é só aplicar sua cor desejada exemplo:

ActiveCell.Interior.ColorIndex = 36

Veja mais em:

http://office.microsoft.com/en-us/excel-help/change-cell-background-color-using-vba-HA001136627.aspx

http://dmcritchie.mvps.org/excel/colors.htm

Att