Использование CountIf под заголовком VBA

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

If WorksheetFunction.CountIf(wksdata.Range("D:D"), "MAN002") > 1 Then 
wksdestination.Range("B6:R6").AutoFill Destination:=wksdestination.Range("B6:R" & Lastrow)
End If

Это привело к тому, что макрос сломался, поскольку он пытался автоматически заполнить нижнюю часть листа, идеальным было бы количество ячеек от A6 вниз, в A5 есть заголовок, в A3 есть слово «Месяц», а A1 и A2 объединены чтобы сформировать A1:L1 и A2:L2 соответственно.


person DannyBland    schedule 18.09.2014    source источник
comment
Если я смогу заставить его считать только в том случае, если Range (C: C) = MRI, это может дать требуемый результат.   -  person DannyBland    schedule 18.09.2014


Ответы (1)


Понял, что делаю что-то сложное, когда было действительно простое решение. Проверьте, есть ли у A7 данные.

 If wksdestination.Range("A7") <> "" Then

фейспалм

person DannyBland    schedule 18.09.2014