Ссылка на ячейку до последней строки - PullRequest
1 голос
/ 01 октября 2019

Может ли кто-нибудь помочь мне с приведенным ниже кодом.

Я пытаюсь найти, содержит ли ячейка какой-либо текст, который находится в заданном диапазоне ячеек. А затем верните найденный текст. И это работает нормально, если я задаю диапазон ячеек, например, B4: B6, но я хочу, чтобы он был динамическим до последней строки в столбце B.

Формула Используется в ячейке

IFERROR(LOOKUP(1,0/COUNTIF($H2,"*"&Requirement!$B$2:$B$4&"*"),Requirement!$B$2:$B$4),"No Data")

VBA Scrpit

ActiveCell.FormulaR1C1=_"=IFERROR(LOOKUP(1,0/COUNTIF(RC8,""*""&Requirement!R2C2:R4C2&""*""),Requirement!R2C2:R4C2),""No Data"")"

Здесь вместо Requirement!$B$2:$B$4 я хочу, чтобы оно было до последней строки.

1 Ответ

1 голос
/ 01 октября 2019

Это зависит от того, хотите ли вы последнюю строку на листе или последнюю строку, содержащую данные. Общее решение относительно простое: вы заменяете

"R2C2:R4C2"

на

"R2C2:R" & Rows.Count & "C2"

. Таким образом, вы получите последнюю строку на листе. Если вам нужна последняя строка, содержащая данные в столбце B, используйте:

"R2C2:R" & ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row & "C2"

Используйте это для замены всех соответствующих ссылок на ячейки в вашем коде.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...