Друзья, в обработке присутствует пример выгрузки, в которой реализовано:
- Приведение экспортируемых данных к типам Excel. В целом доступно применение любого формата числа (даты).
- Полный доступ к настройкам стилей. Шрифты, границы, оформление цветом.
- Вывод строк, добавление группировок, настройка ширины колонок, объединение ячеек.
- Применение условного форматирования. Например возможно выделить ячейки значение которых больше 500 цветом или применить "Шкалу цветов".
- Добавление графиков. Как вариант можно добавить гистограмму Парето, в примере выведены 3 различных графика.
- Добавление сводных таблиц. Доступно применение отборов, добавление фильтров, строк, столбцов, значений.
Конечно, это не все возможности Excel, но я глубоко убежден, что с помощью этой разработки каждый сможет воплотить в реальность все требования к оформлению от заказчика. Все, что нужно, это создать пустой файл Excel, скопировать его и внести необходимые изменения уже во второй файл, а после сравнить файлы xml до и после и реализовать необходимые изменения в обработке.
Приведу пример вывода сводной таблицы из примера, реализованного в обработке:
Процедура ПримерЭкспортаЛистДанныеСводнаяТаблицаВывести(КнигаExcel, КолонкиExcel, ДанныеВыборка, ОформленияЯчеек)
// Выполним добавление сводной таблицы
КнигаExcel.ЛистСводнаяТаблицаДобавить();
// Выполним установку источника данных
КнигаExcel.ЛистСводнаяТаблицаИсточникДанныхУстановить(КолонкиExcel
, ОформленияЯчеек
, 1
, КолонкиExcel.ВГраница()
, 1
, ДанныеВыборка.Количество() + 1);
// Выполним размещение
КнигаExcel.ЛистСводнаяТаблицаРазместить("L3:N20");
// Выполним описание полей
КолонкаОписание = КнигаExcel.КолонкаОписаниеНайти(КолонкиExcel, "Строка");
КнигаExcel.ЛистСводнаяТаблицаСтрокаДобавить(КолонкаОписание);
КнигаExcel.ЛистСводнаяТаблицаОтборДобавить(КолонкаОписание, "Уфа");
КнигаExcel.ЛистСводнаяТаблицаОтборДобавить(КолонкаОписание, "Николаевка");
КолонкаОписание = КнигаExcel.КолонкаОписаниеНайти(КолонкиExcel, "ДатаМесяц");
КнигаExcel.ЛистСводнаяТаблицаСтолбецДобавить(КолонкаОписание);
КолонкаОписание = КнигаExcel.КолонкаОписаниеНайти(КолонкиExcel, "ЧислоССотыми");
КнигаExcel.ЛистСводнаяТаблицаЗначениеДобавить(КолонкаОписание);
КолонкаОписание = КнигаExcel.КолонкаОписаниеНайти(КолонкиExcel, "ЧислоЦелоеРубль");
КнигаExcel.ЛистСводнаяТаблицаФильтрДобавить(КолонкаОписание, Неопределено);
// Выполним сохранение в книгу
КнигаExcel.ЛистСводнаяТаблицаЗаписать();
КонецПроцедуры
Как видите, все просто, данная разработка в помощь!
Обработка является частью модуля Стандартные подсистемы.
Проект и исходный код доступен на GitLab.
-----
Требования:
- Обработка предназначена для версии платформы >= 8.3.10, тестировалась на 8.3.10.2772
-----
Ссылки:
- Проект в GitLab
- Инструмент для сравнения файлов xlsx
Проверено на следующих конфигурациях и релизах:
- 1С:Библиотека стандартных подсистем, редакция 3.1, релизы 3.1.10.344
