Problem with counting coloured cells

[ilovepizza82]

Hi,

When i fill a cell with a colour manually everything works fine but
when Im using "conditional formatting" to highlight the lowest number with the same colour its showing 0.
Could anyone help please ?

This is the code im using:
Function CountCcolor(range_data As range, criteria As range) As Long
Dim datax As range
Dim xcolor As Long
xcolor = criteria.Interior.ColorIndex
For Each datax In range_data
If datax.Interior.ColorIndex = xcolor Then
CountCcolor = CountCcolor + 1
End If
Next datax
End Function

PS2: And this is the formula:
=CountCcolor(O14:O17,T11)
T11 = Source of the colour