Имя: Пароль:
1C
1С v8
Работа с Экселем 2
0 margoigo
 
12.05.16
08:33
Есть задача прописать формулу в Экселе из 1С. Формулу прописываю, всё ок. Но формулу надо протянуть на весь столбец. В экселе это делается за 1 минуту. Если я начинаю вбивать формулу из 1С в каждую строку, то на весь столбец уходит 20 минут времени - это долго. Как программно в 1С протянуть формулу на весь столбец???
Пробую записать макрос в Экселе, вот что выдает:

Selection.AutoFill Destination:=Range("G2:G614"), Type:=xlFillDefault
    Range("G2:G614").Select

Помогите, как это все в 1С прикрутить?

Сейчас у меня в 1С  стоит так:
Для НомСтроки = 1 по Количество Цикл
  Лист.Cells(НомСтроки+11,11).Formula="=RC[-2]*RC[-1]";
КонецЦикла;

Этот кусочек очень долгий.
1 b_ru
 
12.05.16
08:45
Лист.Range(Лист.Cells(1,11), Лист.Cells(Количество, 11)).Formula="=RC[-2]*RC[-1]";
2 b_ru
 
12.05.16
08:47
А чтобы работа в принципе не тормозила с экселем, делай так
ExcelApplication.ScreenUpdating = Ложь;
...тут весь твой код
...
...перед показом пользователю
ExcelApplication.ScreenUpdating = Истина;
3 margoigo
 
12.05.16
09:04
Спасибо!!!! Отработал быстрее, спасибо!!