Протяжка формул макросом

Пользователь

Сообщений: 274 Регистрация: 29.03.2018

29.03.2018 15:26:58

Добрый день.

Как через макросы прописать протяжку формул, если количество строк не известно, и слева данных нет.
При не-первом столбце все просто, типа

Код
Range("X2:X" & Cells(Rows.Count, 1).End(xlUp).Row).Formula = [BX].FormulaR1C1

А как выписать на первый столбец?? что-то не дойду никак...

Пример во вложении... Спс заранее.

Прикрепленные файлы

протяжка формулы.xlsx (10.88 КБ)

V Пользователь Сообщений: 5196 Регистрация: 22.12.2012	#2 29.03.2018 15:31:17 как вариант : Cells(Rows.Count, 1) здесь 1 это столбец по которому ищется последняя заполненная ячейка, замените на тот в котором 100% будет последняя. Изменено: V - 29.03.2018 15:31:51

TheBestOfTheBest

Пользователь

Сообщений: 2366 Регистрация: 03.04.2015

Excel 2010 +PLEX +SaveToDB +PowerQuery

29.03.2018 15:56:22

Цитата
andylu написал: А как выписать на первый столбец

также как и на второй

Код
Range("B2:B" & Cells(Rows.Count, 1).End(xlUp).Row).Formula = [BX].FormulaR1C1

Изменено: TheBestOfTheBest - 29.03.2018 16:18:59

Неизлечимых болезней нет, есть неизлечимые люди.