Вставьте рассчитанные значения вместо формулы

Question

У меня есть следующий код, где я вставляю формулу в диапазон ячеек. проблема в том, что это сильно замедляет мой лист Excel. как добавить только вычисленные значения вместо самой формулы?

 Set rng = Range("C4") 'select cell where first value of the filtered values is

   Range(rng, rng.End(xlDown)).Offset(, 1).FormulaR1C1 = "=countif(C[-3]:C[-3] ,R[]C[-1])"
    Range(rng, rng.End(xlDown)).Offset(, 1).Copy
    Range(rng, rng.End(xlDown)).Offset(, 1).PasteSpecial xlPasteValues