Solved: colorindex = xlnone ?

[Charlize]

Does someone have the same experience when using this line[VBA]Cells.Interior.ColorIndex = xlNone[/VBA] the cell colors turquoise instead of removing the color and when using this [VBA]Cells.Interior.ColorIndex = xlColorIndexNone[/VBA]the cell color is indead removed.

Charlize

[Simon Lloyd]

How about using something like:
[vba]Sub cfind()
For Each cell In Selection
If cell.Interior.ColorIndex <> xlNone Then
MsgBox "Found Colour at " & cell.Address & "This Colour Index " & cell.Interior.ColorIndex
End If
Next
End Sub
[/vba]this will search your selected range and provide you with the cell address and the colour index!J ust in case there some underlying format or if it was an import from a website etc.
Regards,
SImon

[mdmackillop]

Check for conditional formatting.

[Simon Lloyd]

Sorry Malcom i should have thought of that!

[vba]

Sub cfind()

For Each cell In Selection
If cell.Interior.ColorIndex <> xlNone Then
MsgBox "Found Colour at " & cell.Address & "This Colour Index " & cell.Interior.ColorIndex
End If
Next
Selection.FormatConditions.Delete
End Sub

[/vba]if you dont want to use VBA to delete format conditions you can always press Ctrl+A twice! and then go to conditional formatting and delete.

Regards,
SImon