Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
25 ноя 2024, 09:27

Программное заполнение bp 1C таблицы в Excel

Автор SitnovaMarina, 06 ноя 2015, 22:50

0 Пользователей и 1 гость просматривают эту тему.

SitnovaMarina

Приведу сразу пример кода


МассивКОМ = Новый COMSafeArray("VT_VARIANT", ВсегоКолонок, ВсегоСтрок);
Для индСтрок = 0 По ВсегоСтрок - 1 Цикл

    СтрокаТаблицы = Строки[индСтрок];

    СтрокаТаблицыСписок = Новый СписокЗначений;

    МассивКОМ.SetValue(0, индСтрок, Строка(СтрокаТаблицы.Артикул));
    МассивКОМ.SetValue(1, индСтрок, Строка(СтрокаТаблицы.ДляАппарата));
    МассивКОМ.SetValue(2, индСтрок, Строка(СтрокаТаблицы.ДляБренда));
    МассивКОМ.SetValue(3, индСтрок, Строка(СтрокаТаблицы.ДляМоделиУстройства));
    МассивКОМ.SetValue(4, индСтрок, Строка(СтрокаТаблицы.ТипАксессуара));
    МассивКОМ.SetValue(5, индСтрок, Строка(СтрокаТаблицы.Характеристика));
    МассивКОМ.SetValue(6, индСтрок, Строка(СтрокаТаблицы.Производитель));
    МассивКОМ.SetValue(7, индСтрок, Строка(СтрокаТаблицы.Серия));
    МассивКОМ.SetValue(8, индСтрок, Строка(СтрокаТаблицы.Распродажа));
    МассивКОМ.SetValue(9, индСтрок, Строка(СтрокаТаблицы.ДоступноеКоличество));
    МассивКОМ.SetValue(10, индСтрок, Число(СтрокаТаблицы.Стоимость));
    МассивКОМ.SetValue(13, индСтрок, Строка(СтрокаТаблицы.Топ));
    МассивКОМ.SetValue(14, индСтрок, Строка(СтрокаТаблицы.Новинка));
    МассивКОМ.SetValue(15, индСтрок, Строка(СтрокаТаблицы.СсылкаWeb));   
    МассивКОМ.SetValue(16, индСтрок, Строка(СтрокаТаблицы.СсылкаНаАрхивФото));
КонецЦикла;

Лист.Range(Лист.Cells(НомерСтроки,1), Лист.Cells(КоличествоСтрок,17)).Value = МассивКОМ;


То есть сначала формируется ТЗ, а потом она "выгружается сразу вся" в Эксель. Быстро и ёмко
Народная мудрость: Программу встречают по интерфейсу

Дмитрий@

ЦитироватьМожет попробовать передать данные в процедуру книги эксель, и оттуда заполнить шаблон.

Это как?:dfbbdrfb:

Создать процедуру, по заполнению шаблона, в шаблоне эксель, передать в эту процедуру данные и запустить ее.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск