Подсчет ячеек, содержащих определенное значение, которые имеют определенный формат в Excel 2016

Question

Мне нужно подсчитать количество ячеек в моей электронной таблице, которые выделены и имеют определенное значение. Я новичок в VBA, хотя и не уверен, как совместить эти два условия. Это не работает, но мои мысли пока ниже. Есть идеи, почему это не работает?

Function Countif_by_color_number(r1 As Range, r2 As Range, r3 As Range) As Long

 Application.Volatile
 Dim x As Long
 Dim cel As Range

 x = 0

 For Each cel In r1
     If cel.Interior.Color = r2.Interior.Color And cel.Value = r3.Value Then
             x = x + 1
     End If
 Next

 Countif_by_color_number = x

End Function