Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Протяжка формул макросом
 
Добрый день.

Как через макросы прописать протяжку формул, если количество строк не известно, и слева данных нет.
При не-первом столбце все просто, типа
Код
Range("X2:X" & Cells(Rows.Count, 1).End(xlUp).Row).Formula = [BX].FormulaR1C1

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

Пример во вложении... Спс заранее.
 
как вариант : Cells(Rows.Count, 1) здесь 1 это столбец по которому ищется последняя заполненная ячейка, замените на тот в котором 100% будет последняя.
Изменено: V - 29 Мар 2018 15:31:51
 
Цитата
andylu написал:
А как выписать на первый столбец
также как и на второй
Код
Range("B2:B" & Cells(Rows.Count, 1).End(xlUp).Row).Formula = [BX].FormulaR1C1
Изменено: TheBestOfTheBest - 29 Мар 2018 16:18:59
Неизлечимых болезней нет, есть неизлечимые люди.
Страницы: 1
Читают тему (гостей: 1)