Использование переменной диапазона в формуле

Question

Я пытаюсь использовать формулу COUNTIF, используя переменную диапазона, но вокруг значения моей переменной есть дополнительный символ ''.

    Dim refRange As Range
    Set refRange = Range(Range("F2"), Range("F2").End(xlDown))

    Range("G1").Select
    ActiveCell.FormulaR1C1 = "=COUNTIF(" & refRange.Address(False, False) & ",""PP"")"

Вывод выдает ошибку NAME, и когда я проверяю значение ячейки G2, я получаю это =COUNTIF('F2':'F23',"PP"), я хотел избавиться от '' вокруг значения.

Answer 1

Используйте ActiveCell.Formula вместо ActiveCell.FormulaR1C1:

Dim refRange As Range
Set refRange = Range(Range("F2"), Range("F2").End(xlDown))

Range("G1").Select
ActiveCell.Formula = "=COUNTIF(" & refRange.Address(False, False) & ",""PP"")"