Вставьте формулу COUNTIF, если у вас есть переменная, содержащая значение

Учитывать:

 Cells(2, "Q").Formula = "=COUNTIF(P$1:P1,P2)=0"

Как мне вставить эти формулы, когда у меня есть переменная, содержащая значение?

Иногда мне приходится начинать формулу с 3550 строк и 4000 строк. Это зависит от данных. Ну, когда я гуглил, я ничего не нашел. Все они использовали одну и ту же формулу, но мне нужно вставить функцию countif в определенную ячейку, может быть в 300 или 500 - это зависит от значения переменной.

 Cells(count,"Q").formula = "=COUNTIF(cells($1,"P"):cells(count-1,"P"),cells(count,"P))=0"

Это путь? Что ж, я пытался кое-как, но в итоге линия была выделена красным цветом. Как мне вставить эти формулы с переменной?


excel excel-formula vba excel-2003
person niko    schedule 24.08.2011    source источник

Ответы (1)


arrow_upward
3
arrow_downward

Попробуй это:

'case 1: if you know the destination range
Range("Q2").Formula = "=COUNTIF(P$1:P1,P2)=0"
Range("Q2").Copy Destination:=range("Q3:Q500")

'case 2: if the destination range is a variable
'minRow is a Long >= 1
Range("Q" & minRow + 1).Formula = "=COUNTIF(P$" & minRow & ":P" & minRow & ",P" & minRow + 1 & ")=0"
Range("Q" & minRow + 1).Copy Destination:=Range("Q" & minRow + 1 & ":Q" & maxRow)

Ссылка: Ответ Иссуна на вопрос о переполнении стека Как вставить формулу в ячейку, когда формула сохраняется меняется с увеличением строки?.

person JMax    schedule 24.08.2011
comment
.Эй, это не начнется с Q3, может быть с Q300, я имею в виду, вы указали для конца строки, где закончить копирование, но не для начальной строки, я имею в виду, с чего начать. Начальная строка не всегда будет 3 может быть 300 иногда. Пожалуйста, обновите свой ответ - person niko; 24.08.2011
comment
@niko: это был пример, вы могли бы адаптировать его самостоятельно. В любом случае, я отредактировал свой ответ - person JMax; 24.08.2011
comment
а как насчет countif Вопрос был о countif а не только о пункте назначения! - person niko; 24.08.2011
comment
@Issun спасибо, что помогли мне с вашими ответами, и у меня есть последний вопрос об excel vba, так что Issun будьте готовы к моему последнему вопросу об excel VBA, если этот вопрос решен, тогда мой проект завершен! слава богу, пожалуйста, ответьте на мой вопрос. - person niko; 24.08.2011