Поиск
... отвечает не formula / formular1c1, а FormulaArray.
Растягивать нужно в " ... ).End(xlUp).Row
With wSh_Base_Sales
'Копирую формулы в весь диапозон
.Range ... (3, i), .Cells(lLastRow_Prod_Un_C, i)).FormulaArray = .Range(.Cells(3, i), .Cells ... ("P3:P" & lLastRow_Prod_Un_C).FormulaArray = wSh_Base_Sales.Range("P3:P ... ("Q3:Q" & lLastRow_Prod_Un_C).FormulaArray = wSh_Base_Sales.Range("Q3:Q ...
Изменен: 24.10.2016
Читать сообщение на форуме или сайте.