Выгрузка в Excel с использованием формата OpenXML

18.09.18

Интеграция - Загрузка и выгрузка в Excel

По работе приходится часто выгружать данные в Excel формате. При большом количестве строк и формул этот процесс достаточно длительный. Решил написать для своих целей небольшую библиотечку для выгрузки данных. Используется технология open-xml. Никаких библиотек не надо, пишу напрямую в xml файлики. Платформа 8.3.11 Для теста обычных форм брал УТ 10.3

Скачать файлы

Наименование Файл Версия Размер
Excel: создание в формате xlsx без COM технологии(обычные формы)
.epf 18,16Kb
11
.epf 18,16Kb 11 Скачать
Выгрузка в Excel с использованием формата OpenXML(УФ ):
.epf 25,82Kb
29
.epf 25,82Kb 29 Скачать
Выгрузка в Excel с использованием формата OpenXML(cf):
.cf 36,23Kb
20
.cf 36,23Kb 20 Скачать

Обработка демонстрирует возможности библиотеки

Процедура Рамки(Книга)
	рамки =   Книга.рамки;
	рамки.Добавить(	"1000", "<border><left style='thin'><color indexed='64'/></left><right/><top/><bottom/><diagonal/></border>");
	рамки.Добавить(	"1100", "<border><left style='thin'><color indexed='64'/></left><right style='thin'><color indexed='64'/></right><top/><bottom/><diagonal/></border>");
	рамки.Добавить(	"0010", "<border><left/><right/><top style='thin'><color indexed='64'/></top><bottom/><diagonal/></border>");
	рамки.Добавить( "0011", "<border><left/><right/><top style='thin'><color indexed='64'/></top><bottom style='thin'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить(	"1111", "<border><left style='thin'><color indexed='64'/></left><right style='thin'><color indexed='64'/></right><top style='thin'><color indexed='64'/></top><bottom style='thin'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить( "0111", "<border><left/><right style='thin'><color indexed='64'/></right><top style='thin'><color indexed='64'/></top><bottom style='thin'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить(	"2122", "<border><left style='medium'><color indexed='64'/></left><right style='thin'><color indexed='64'/></right><top style='medium'><color indexed='64'/></top><bottom style='medium'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить(	"1122", "<border><left style='thin'><color indexed='64'/></left><right style='thin'><color indexed='64'/></right><top style='medium'><color indexed='64'/></top><bottom style='medium'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить(	"2211", "<border><left style='medium'><color indexed='64'/></left><right style='medium'><color indexed='64'/></right><top style='thin'><color indexed='64'/></top><bottom style='thin'><color indexed='64'/></bottom><diagonal/></border>");
	рамки.Добавить( "2222", "<border><left style='medium'><color indexed='64'/></left><right style='medium'><color indexed='64'/></right><top style='medium'><color indexed='64'/></top><bottom style='medium'><color indexed='64'/></bottom><diagonal/></border>");
КонецПроцедуры

Процедура шрифты(Книга)
	шрифты =   Книга.Шрифты; 
	шрифты.Добавить("Arial_6"  , "<font><sz val='6'/><name val='Arial'/><family val='2'/></font>"    );
	шрифты.Добавить("Arial_8"  , "<font><sz val='8'/><name val='Arial'/><family val='2'/></font>"    );
	шрифты.Добавить("Arial_8_b", "<font><b/><sz val='8'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_9"  , "<font><b/><sz val='9'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_10" , "<font><sz val='10'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_11" , "<font><sz val='11'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_11_b", "<font><b/><sz val='11'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_11_FF413003", "<font><sz val='11'/><color rgb='FF413003'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_11_b_i", "<font><b/><i/><sz val='11'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_11_b_FF413003", "<font><b/><sz val='11'/><color rgb='FF413003'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_12", "<font><sz val='12'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_12_b", "<font><b/><sz val='12'/><name val='Arial'/><family val='2'/></font>");
	шрифты.Добавить("Arial_12_b_FF413003","<font><b/><sz val='12'/><color rgb='FF413003'/><name val='Arial'/><family val='2'/></font>");
КонецПроцедуры

Процедура Заливки(Книга)
	Заливки =   Книга.Заливки;
	Заливки.Добавить("fill_FFFFFF00","<fill><patternFill patternType='solid'><fgColor rgb='FFFFFF00'/><bgColor indexed='64'/></patternFill></fill>");
КонецПроцедуры

//  Создание книг
   // создание 1 книги с заданным числом листов
Процедура СоздатьПустуюКнигу(КоличествоЛистов)
    книга = СоздатьКнигу(КоличествоЛистов);	
	Записать_книгу(книга, папка + "\ПустаяКнига.xlsx")
КонецПроцедуры

   // создание 2 книг и работа с ней
Процедура СоздатьПустуюКнигу_2(КоличествоЛистов)
    книга = СоздатьКнигу(КоличествоЛистов);	
	ДобавитьСтроку(книга, 1, "B" ,"1", "ооо веснушка_1111"            , 0);

    книга1 = СоздатьКнигу(1);
	ДобавитьСтроку(книга1, 0, "B" ,"1", "ооо веснушка_2222"            , 0);

	Записать_книгу(книга, папка + "\ПустаяКнига_1.xlsx");
	Записать_книгу(книга1, папка + "\ПустаяКнига_2.xlsx");
КонецПроцедуры

    // создание книги с  о стилями
Процедура СоздатьКнигуПроба()
	книга = СоздатьКнигу();
	
	Рамки(Книга);
	Заливки(Книга);
	шрифты(Книга);
	
    ЛистНомер =0 ;

	Заголовок11             = ДобавитьСтиль(книга, 0, книга.шрифты.Индекс(книга.шрифты.НайтиПоЗначению("Arial_11"))  , 0, 0, "vertical='center'");
	Заголовок11_рамка_центр = ДобавитьСтиль(книга, 0, книга.шрифты.Индекс(книга.шрифты.НайтиПоЗначению("Arial_12_b")), 0, книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("1111")), "horizontal='center'");
	// https://msdn.microsoft.com/ru-ru/library/office/documentformat.openxml.spreadsheet.numberingformat.aspx
	Заголовок11_рамка_дата  = ДобавитьСтиль(книга,14, книга.шрифты.Индекс(книга.шрифты.НайтиПоЗначению("Arial_11"))  , 0, книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("1111")), "horizontal='center'");	
	ПодСтрокой              = ДобавитьСтиль(книга, 0, книга.шрифты.Индекс(книга.шрифты.НайтиПоЗначению("Arial_6"))   , 0, 0, "horizontal='center' vertical='top'");	
	Заголовок12             = ДобавитьСтиль(книга, 0, книга.шрифты.Индекс(книга.шрифты.НайтиПоЗначению("Arial_12"))  , 0, 0, "");	
	
	Рамка_верх_низ          = ДобавитьСтиль(книга, 0, 0, 0, книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("0011")), "");  
	Рамка_верх_низ_право    = ДобавитьСтиль(книга, 0, 0, 0,	книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("0111")), "");
	Рамка_верх              = ДобавитьСтиль(книга, 0, 0, 0,	книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("0010")), "");
	Рамка_л                 = ДобавитьСтиль(книга, 0, 0, 0,	книга.рамки.Индекс(книга.рамки.НайтиПоЗначению("1000")), "");
	хмл = "";
	ДобавитьСтроку(книга, ЛистНомер, "B" ,"1", "ооо веснушка"            , Заголовок12);
	ДобавитьСтроку(книга, ЛистНомер, "B" ,"2", "наименование организации", ПодСтрокой);
	ДобавитьСтроку(книга, ЛистНомер, "B" ,"3", "ооо радость"             , Заголовок12);
	ДобавитьСтроку(книга, ЛистНомер, "B" ,"4", "наименование конрагента" , ПодСтрокой);
	ДобавитьСтроку(книга, ЛистНомер, "D" ,"5", "Номер документа"       , Заголовок11_рамка_центр);
	ДобавитьСтроку(книга, ЛистНомер, "F" ,"5", ""                        , Рамка_верх_низ);
    ДобавитьСтроку(книга, ЛистНомер, "G","5", Формат(НачалоМесяца(Текущаядата()),"ДФ=dd.MM.yyyy"), Заголовок11_рамка_дата); 
	Книга.Листы[ЛистНомер].ОбъединенныеЯчейки.Добавить("<mergeCell ref=""D5:F5""/>");

	Записать_книгу(книга, папка + "\Книга.xlsx")
КонецПроцедуры

     // создание отчета с формулами на основании документа
Процедура СоздатьКнигуДокумент()
	книга = СоздатьКнигу();
	
	Рамки(Книга);
	Заливки(Книга);
	шрифты(Книга);
	
	ЛистНомер =0 ;
	
	СформироватьШапку(книга,ЛистНомер,документ);
	СформироватьШапкуТаблицы(книга, ЛистНомер);
	след = СформироватьСтроки(книга, ЛистНомер);
	ДобавитьФормулу(книга,ЛистНомер,"E" , "E",строка( след),строка( след+11), "SUM(E10:E" + строка(след-1)+")",200,истина,13);

	Колонки(Книга.Листы[ЛистНомер]) ;
	Записать_книгу(книга, папка + "\КнигаДокумент.xlsx")
КонецПроцедуры

    // создание отчета с формулами на основании документа  и выводом тч в таблицу
Процедура СоздатьКнигуДокументТаблица()
	книга = СоздатьКнигу();
	
	Рамки(Книга);
	Заливки(Книга);
	шрифты(Книга);
	
	ЛистНомер =0 ;
	
	СформироватьШапку(книга,ЛистНомер,документ);
	СформироватьШапкуТаблицы(книга, ЛистНомер);
	след = СформироватьСтроки(книга, ЛистНомер);
	tableStyleInfo = "<tableStyleInfo name=""TableStyleLight2"" showFirstColumn=""0"" showLastColumn=""0"" showRowStripes=""1"" showColumnStripes=""0""/>";
	ст = массив_букв[Шапка.Количество()-1];
    СоздатьТаблицу(книга,ЛистНомер, "rr","A10:" + ст+  стрзаменить(строка(след-1),Символы.НПП,""),Шапка,tableStyleInfo);
	
	Колонки(Книга.Листы[ЛистНомер]) ;
	
	Записать_книгу(книга, папка + "\КнигаДокументТаблица.xlsx")
КонецПроцедуры

Функции для работы с библиотекой

СоздатьКнигу(КоличествоЛистов);

Записать_книгу(книга, путь)

Рамки(Книга); //заполнение списка значений
    Заливки(Книга); //заполнение списка значений
    шрифты(Книга); //заполнение списка значений

ДобавитьСтроку(книга,ЛистНомер,столбец,строка, Значение,стиль);

ДобавитьЧисло( книга,ЛистНомер,столбец,строка, Значение,стиль);

ДобавитьФормулу(книга, ЛистНомер, СтолбецНач, СтолбецКон,строкаНач,строкаКон, Значение,НомерФормулы,первая,номер_стиль)

 ДобавитьСтиль(книга,numFmtId, fontId, fillId, borderId, Alignment="")

СоздатьТаблицу(Книга,лист, имя, диапазон, колонки,tableStyleInfo)

19.09.2018

добавил функцию: ДобавитьЗаморозку(книга,лист, колонка, строка)

Excel openxml

См. также

SALE! 10%

Загрузка номенклатуры из Excel в УТ11, КА 2, ERP 2, Розница 2. Дополнительные реквизиты и сведения, характеристики, картинки, цены, остатки

Загрузка и выгрузка в Excel Розничная торговля Логистика, склад и ТМЦ Ценообразование, анализ цен Прайсы Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Розница 2 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Платные (руб)

Загрузка из файлов xls, xlsx, ods, csv, mxl в УТ11, КА 2, ERP 2, Розница 2. Задействованы все возможности конфигурации - заполнение реквизитов номенклатуры, дополнительных реквизитов и сведений, характеристики, доп.реквизиты и сведения характеристик. Дополнительные обработки для расширения возможностей.

10560 9504 руб.

29.10.2014    210177    620    524    

439

Загрузка номенклатуры c картинками (несколько потоков одновременно) и сопутствующими данными в базу и любые документы из yml, xls, xlsx, xlsm, ods, ots, csv для УТ 10.3, УТ 11 (все), БП 3, КА 2, ERP 2, УНФ 1.6/3.0, Розница 2

Загрузка и выгрузка в Excel Логистика, склад и ТМЦ Ценообразование, анализ цен Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Платные (руб)

Эволюция не стоит на месте - новая удобная версия функциональной обработки для Вашего бизнеса! Что же Вы получаете? Удобный и интуитивно понятный интерфейс с 3-мя этапами работы. 2 режима - автоматический и ручной. Чтение XLSX, XLSM, CSV, XML/YML форматов без офиса, на любом сервере! Визуальное связывание колонок файла и реквизитов простым перетаскиванием колонок. Создание или обновление номенклатуры с иерархией, характеристик, доп. реквизитов, упаковок, загрузка практически неограниченного количества картинок на одну номенклатуру (с возможностью загрузки в несколько потоков одновременно), с хранением в томах или в базе. Загрузка номенклатуры поставщиков или поиск по их данным номенклатуры. Загрузка доп. реквизитов в характеристики. Загрузка штрихкодов с генерацией новых. Создание элементов справочников и ПВХ "на лету" для выбранных реквизитов. (Обновление от 11.12.2023, версия 9.5 - 9.9)

13200 руб.

20.11.2015    150721    367    375    

501

Маркетплейсный загрузчик для 12-ти маркетплейсов в "БП 3", "УТ 11", "КА 2", ERP, УНФ

Загрузка и выгрузка в Excel Маркетплейсы Платформа 1С v8.3 Бухгалтерский учет 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Реальный помощник, с помощью которого Вы сделаете необходимые документы для Wildberries, OZON, ЯндексМаркет, Мегамаркет, Aliexpress, "Детский мир", Казань-Экспресс, "Леруа Мерлен", ЭНФАНТА (Акушерство), ЛаМода, Летуаль, "Твой дом" в документы "Отчет комиссионера (агента) о продажах" и другие, может работать в "Бухгалтерия 3", "Бухгалтерия 3 КОРП", УТ 11, УНФ, КА 2, ERP. Возможность подключить любые маркетплейсы. Анализ продаж ОЗОН. 30 дней БЕСПЛАТНОГО пользования!

1800 руб.

12.08.2021    31893    226    63    

117

SALE! 20%

Загрузка документов и номенклатуры из Excel в 1С "одним нажатием": УПД, ТОРГ-12, отчеты маркетплейсов, заказы, счета, прайсы

Загрузка и выгрузка в Excel Оптовая торговля Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 Конфигурации 1cv8 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С. Вместе с номенклатурой может найти контрагента, номер и дату документа, штрих-коды, серии ГТД, страну и т.д. Распознает документы ЛЮБОЙ ФОРМЫ (УПД, ТОРГ-12, заказ, отчет комиссионера и т.д.). Не требует MS Office. Для поиска таблиц используются методы эвристического поиска. Загружает только то, что нужно, т.е. пропускает повторы шапки таблицы, заголовки, промежуточные итоги, подписи и т.д. Содержит модуль работы с электронной почтой и api-загрузчик отчетов о продажах маркетплейсов.

5000 4000 руб.

09.11.2016    214926    925    886    

939

Загрузка данных отчета о реализации товаров из Excel файла СберМегаМаркет

Загрузка и выгрузка в Excel Маркетплейсы Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Загрузка данных отчета о реализации товаров из сервиса СберМегаМаркет для конфигурации: Бухгалтерия предприятия, редакция 3.0; Управление торговлей, редакция 11 и Управление нашей фирмой, редакция 3.0 в документ "Отчет комиссионера (агента) о продажах".

4800 руб.

07.06.2022    15078    79    0    

60

SALE! 30%

Распознавание и загрузка сканов в 1С "одним нажатием": УПД, ТОРГ-12, накладные, счета, номенклатура, заказы и т.д.

Загрузка и выгрузка в Excel Документооборот и делопроизводство (СЭД) Учет документов Распознавание документов и образов Управляемые формы 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная программа для распознавания ЛЮБЫХ СКАНОВ ИЛИ ФОТО ТОВАРНЫХ ДОКУМЕНТОВ в 1С. Не требует указания параметров и предварительной настройки. Просто выбираете файл (PDF, JPG, DOC, XLS, HTML и т.д.) выбираете документ 1С и нажимаете кнопку "Распознать и загрузить".

6000 5520 руб.

04.06.2019    101378    296    173    

312
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. sytkosa 119 18.09.18 23:56 Сейчас в теме
(0) Есть несколько вопросов.
1. Под управляемые формы переделать возможно быстро ?
2. Возможно ли сделать обработку в виде библиотеки например для вызова в oscript ?
3. Вы проводили замеры по скорости записи файла. Можно ли ускорить запись текста ?
4. Умеет ли обработка работать с графикой ?
3. user1045404 166 19.09.18 10:57 Сейчас в теме
(1) сегодня выложу по УФ тестировал на Бухгалтерии.
(2) завтра сделаю конфу с общим модулем.
(3) в статье писал: Делал выгрузку шапка 10 строк тч 4000 строк, 67 столбцов 20 формул в строке. форматирование(шрифты, рамки, ширина столбцов, заливка) времени заняло 135 секунд.
Реально табель с данными который выгружался порядка 30 мин. выгружается 15 мин. с выгрузкой эксперементировал разными способами(шаблона в Excel, вывод с форматировнием, последний вариант вывод в mxl. Сохранение в Excel. Установка формул.)
(4) вставку изображений не делал. Дня два работы. Несколько файлов нужно создавать и установку связей сделать.
2. TMV 14 19.09.18 05:59 Сейчас в теме
Записать_иксель
жесть
user797130; ltfriend; +2 Ответить
4. user1045404 166 19.09.18 11:01 Сейчас в теме
(2) переименую в записать_книгу. (раз так слух режет). в самой обработке использую название функций таким образом
Записать_Content_Types_xml
Записать_styles_fonts
Записать_styles_fills
Записать_workbook_xml_rels
Записать_sheet1_xml_rels

Подчеркивание и два языка.....
5. user1045404 166 19.09.18 11:28 Сейчас в теме
(2) кстати видел еще в названиях функций и переменных "экзель"
6. Serj1C 483 22.10.18 12:01 Сейчас в теме
чем не устроило сохранение табличного документа в формат эксель типовыми методами платформы?
7. user1045404 166 24.10.18 10:58 Сейчас в теме
(6) формулы долго устанавливаются. бывает и офис не установлен.
JenniferOnLine; user797130; +2 Ответить
8. user1045404 166 24.10.18 11:07 Сейчас в теме
(6)плюс выгружаю в таблицу, что пользователю удобно(полосатость, сортировка, фильтрация..)
user797130; +1 Ответить
9. rabid_otter 134 20.11.19 10:58 Сейчас в теме
Используйте СтрСоединить, СтрШаблон вместо конкатенаций в цикле.
user797130; +1 Ответить
Оставьте свое сообщение