Search all the cells highlighted in green & change the colour to purple

[ferocious12]

Hi guys,

Can you help me create a macro that search all the cells on a worksheet in active workbook coloured in green and change the colour to purple ?

Thanks

 

[JawaharPrem]

Hi Ferocious,
have you tried this, "find and replace" -> Options in right side u can see preview in that u can.

Thanks
Jawahar Prem

 

[p45cal]

Attach a workbook with such cells - it will answer questions like; what kinds of green do you want to include, has that green been put there manually or automatically (perhaps as a result of conditoinal formatting) etc. etc.

 

[ferocious12]

Please see attached file

 

[vletm]

ferocious12
Something like this after press that button?

 

[p45cal]

…or:

Sub Blah()
Application.FindFormat.Clear
Application.FindFormat.Interior.Color = 9359529
Application.ReplaceFormat.Clear
Application.ReplaceFormat.Interior.Color = 14188209
Cells.Replace What:="", Replacement:="", LookAt:=xlPart, SearchOrder:= _
              xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=True
End Sub

Operates on the active sheet.

 

[ferocious12]

Many thanks !