Почему вы не используете функцию CountIfs
?
Пример:
Application.CountIfs(CR1_range, V_1, CR2_range, V_2, CR3_range, V_3, CR4_range, V_4)
Где CR1_range - ваш диапазон, а V_1 - ваша переменная
Редактировать: Ooops!Просто видел, что это должно быть оператором ИЛИ, мой ответ будет работать только для оператора И (не удаляется для справки, если кто-то заинтересован)