How to clear content on the cell that has background color from conditional formatting?

Please, help me. I have fill color into cells used conditional formatting. But I can't delete the content using VBA below:

Sub CCVALUES()

	Range("G1:AK500").Select
	For Each Cell In Selection
	If Cell.Interior.ColorIndex = 15 Then
	Cell.ClearContents
	End If
	Next

End Sub

But if I input the color manually it can finds the color index and clears the content.