Формула VBA в ячейку, содержащую строку и другую формулу

#excel #vba #excel-formula

#excel #vba #excel-формула

Вопрос:

Мне нужно вставить в ячейку, используя VBA, 3 подключенных поиска ВПР

 TableIndex = 1
i = 1
ShiftColumn = 20
ShiftCount =  20
Cells(TableIndex, 43).FormulaR1C1 = "=CONCATENATE(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn amp; "R7C2:R" amp; ShiftCount amp; "C10,9),TEXT(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn amp; "R7C2:R" amp; ShiftCount amp; "C10,3),""hhmm""),TEXT(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn amp; "R7C2:R" amp; ShiftCount amp; "C10,4),""hhmm""))"
  

Но это выдает ошибку 1004

Комментарии:

1. Отладка. Распечатайте формулу и попробуйте скопировать ее в ячейку — это даст вам больше информации о том, в чем может заключаться проблема.

2. Вам не хватает запятой между значениями поиска и диапазонами поиска

3. @chrisneilsen Спасибо, это сработало. Для тех, кому интересно: Cells(TableIndex, 43).FormulaR1C1 = "=CONCATENATE(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn - 1 amp; ",R7C2:R" amp; ShiftCount amp; "C10,9),"" "",TEXT(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn - 1 amp; ",R7C2:R" amp; ShiftCount amp; "C10,3),""hhmm""),""-"",TEXT(VLOOKUP(R" amp; i amp; "C" amp; ShiftColumn - 1 amp; ",R7C2:R" amp; ShiftCount amp; "C10,4),""hhmm""))"