Добрый день.
Подскажите пожалуйста, хочу облегчить код и пришел к такому моменту.
For I=2 to 20
Есть формула
=ИНДЕКС('Лист2'!D3:D22;ПОИСКПОЗ(Лист1!Y3;'Лист2'!A3:A22;0))
В VBA формулы записываются в "кавычках"
'Формула показывает значение со сдвигом в ячейке если значение совпадает в выбранном массиве
Можно как то задать Лист1!Y3 переменой, по типу Лист1!Y&I
Лист1!Y&I = Range("O2")
Range("O2")=I
next i
как вариант прописывать функцию и запихивать find, а результаты двигать через offset
Вы в этой теме не продолжили обсуждать. Прежде чем задавать новый вопрос, нужно завершить предыдущую тему.
https://forumvba.ru/index.php?topic=2211.msg13154#msg13154
Все гениальное просто. надо было разделить формулу "кавычками" & переменная & продолжение формулы
wer = ThisWorkbook.Worksheets("RT").Range("O2")
ThisWorkbook.Worksheets("RT").Range("A5").Formula = "=INDEX('Объект строительства'!D3:D22,MATCH(DRAFT!Y" & wer & ",'Объект строительства'!A3:A22,0))"