Выгрузка отчета в Excel с формулами, используя заполнение - шаблон макета для сложных формул

18.07.18

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

Каждому программисту 1с, хоть раз, да приходилось писать выгрузку отчета из 1С в Excel с формулами. Есть много вариантов как это сделать. Но мне захотелось это сделать "по нормальному", используя как можно меньше кода выгрузки в excel, и так чтобы проще было дорабатывать. Идея была проста, все формулы засунуть в макет, и при выводе в Excel просто "проинициализировать" их. Но меня ждал облом, который мне пришлось героически преодолевать. Спойлер - в итоге все получилось...)

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		По подписке [?]	Купить один файл
Выгрузка отчета в Excel с формулами, используя заполнение - шаблон макета для сложных формул: .erf 12,43Kb 68	68	Скачать (1 SM)	Купить за 1 850 руб.

Итак, задача следующая - нужно выгрузить отчет сразу в Excel, отчет с кучей формул, формулы сложные, с выделением групп и т.п., отчет за свою жизнь будет не раз правиться, и формулы будут становится всё "ужаснее" и сложнее, структура отчета, как это ни странно, изменяться будет не часто и не сильно.

Отчетов таких была написана куча и на доработку каждого требовалось куча времени. Я захотел попробовать найти какой-нибудь новый подход - все формулы засунуть в макет. Но меня поджидал облом... С простыми формулами типа "=RC[-2]-RC[-1]" все было замечательно - внести как текст и все ок, но, когда потребовалось реализовать формулу чуть посложнее, типа "=СУММ(R[1]C:R[КоличествоСтрок]C)", то тут ждал облом... Тут сразу напрашивается шаблон, но как оказалось, шаблон никак не хотел выводить символ "[", т.к. для 1С это служебный символ, определяющий параметры для шаблона. Поиск в инете типа "как вывести квадратные скобки в шаблоне макета" ничего не дал, вообще ничего не дал! Путем проб и ошибок выяснилось, чтоб вывести "КакойТоТекст[1]" нужно задать "КакойТоТекст[[1]". А вот чтоб задать "КакойТоТекст[1]ещё[КоличествоСтрок]", где КоличествоСтрок - это параметр, который нужно менять, то тут нужно извратиться по жёсткому - "КакойТоТекст[][[1]ещё[][[[КоличествоСтрок]]". Конструкция [] - нужна, чтоб не удалялся текст - "КакойТоТекст".

Итого: копируем формулу Excel, модифицируем её:

1. заменяем ";" на ","

2. к неизменным значениям в скобках добавляем спереди [][

3. изменяемые значения в скобках обворачиваем [][[изменяемое значение в скобках]. И макет готов.

И тогда весь код при формировании Excel будет минимальным:

ФормированиеExcel

  #Область ФормированиеExcel

       Эксель = Новый COMОбъект("Excel.Application");
       Эксель.Application.DisplayAlerts = False;
       Эксель.Application.ReferenceStyle = "xlR1C1";
       Эксель.Application.ErrorCheckingOptions.InconsistentFormula = Ложь;

       Книга = Эксель.Workbooks.Open(ПутьКФайлу);

       Лист = Книга.WorkSheets(1);

        ВсегоКолонок   = ТабличныйДокумент.ШиринаТаблицы;
       ВсегоСтрок       = ТабличныйДокумент.ВысотаТаблицы;

       МассивКом = Лист.Range(Лист.Cells(1, 1), Лист.Cells(ВсегоСтрок, ВсегоКолонок)).FormulaR1C1;
       Для Ном = 1 По МассивКом.GetLength(0) Цикл
           Для Ном2 = 1 По МассивКом.GetLength(1) Цикл
               Значение = МассивКом.GetValue(Ном,Ном2);

               Если НЕ Найти(Значение, "") = 0 Тогда
                   МассивКом.SetValue(Ном, Ном2, СтрЗаменить(Значение, "", ""));
               КонецЕсли;

               Если СтрНачинаетсяС(Значение, "=") Тогда //Формулам зададим формат...
                   Ячейка = Лист.Cells(Ном2,Ном);
                   Ячейка.NumberFormat = "# ##0,00;-# ##0,00;""""";
               КонецЕсли;

           КонецЦикла;
       КонецЦикла;
       Лист.Range(Лист.Cells(1, 1), Лист.Cells(ВсегоСтрок, ВсегоКолонок)).FormulaR1C1 = МассивКом; //Если тут ошибка, то скорее всего косяк в формуле

       Книга.SaveAs(ПутьКФайлу);

       Эксель.Quit();
       Эксель = Неопределено;
       #КонецОбласти

Как вы будете использовать макет - это ваше дело, хотите формируйте отчет через СКД используя Макет, хотите выводите отчет алгоритмически. В приложенном файле, я использую алгоритмическое формирование табличного документа (через СКД не получилось получить КоличествоСтрок), а затем формирую Excel файл из него. Приложенный файл это шаблон для ознакомления с подходом, он будет запускаться в Бухгалтерии, УТ, в общем там где есть регистр сведений ЦеныНоменклатуры.

Конечно формула в таком виде "=КакойТоТекст[][[1]ещё[][[[КоличествоСтрок]]" мне не очень нравится. Если кто-нибудь знает, как можно представить формулу в более наглядном виде, был бы рад узнать...

Версия платформы, на которой тестировался отчет: 8.3.10.2299.

квадратные скобки в шаблоне макета [ в шаблоне макета формула excel через шаблон макета как вывести квадратные скобки в шаблоне макета

+21 –

См. также

SALE! 20%

Из Excel в 1С "одним нажатием"

Загрузка и выгрузка в Excel Оптовая торговля Печатные формы Бухгалтер Пользователь Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 1C:Бухгалтерия 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С:Розница 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Забудьте о ручном вводе: загружайте документы из Excel в 1С за секунды! Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С.

~~6000~~ 5100 руб.

09.11.2016 240143 1100 906

1031

Маркетплейсный загрузчик для 12+ маркетплейсов в 1С:БП 3.0, 1С:УТ 11, 1C:КА 2, 1C:ERP, 1C:УНФ

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

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

5400 руб.

12.08.2021 37277 396 68

170

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

Загрузка и выгрузка в 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 1С:Розница 3.0 Платные (руб)

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

16800 руб.

20.11.2015 158338 385 378

515

Загрузка отчета о продажах WildBerries для бухгалтера из API Статистики и Отчетов в формате *.xlsx в 1С документ "Отчет комиссионера"

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

Загрузка данных детализированного отчета о продажах WildBerries в 1С документ "Отчет комиссионера" для бухгалтера для следующих конфигураций 1С: БП 3.0; УНФ 3.0; УТ 10.3; УТ 11.4/11.5, КА 2.4/2.5 и ERP 2.4/2.5

4800 руб.

11.12.2019 59004 1007 3

248

Загрузка данных отчета о реализации товаров из Excel файла "Детский мир" в 1С

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

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

4800 руб.

23.01.2022 11597 63 0

Загрузка в 1С документов поступления из файла XML (ЭДО формат 820) для 1С:БП 3.0, 1С:УТ10/11, 1С:КА 2.5, 1С:УПП1.3

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

Кто получает документы в формате XML из различных сервисов ЭДО (формат 820 приказ ФНС 31 мая 2019) и набивает их вручную в 1С, тот наверняка хотел бы автоматизировать этот процесс. Поддержка конфигураций: Бухгалтерии 3, УПП 1.3, 1С:КА 2.4 и 1С:КА 2.5, УТ10, УТ11.4 и УТ11.5. Для бухгалтерии 3 добавлена поддержка формат 5.03 от 23/01/2025

4320 руб.

11.02.2020 94237 314 157

228

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

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

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

11100 руб.

29.10.2014 218025 665 529

457

SALE! 30%

Сканы в 1С одним нажатием

Загрузка и выгрузка в 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С и нажимаете кнопку "Распознать и загрузить".

~~8400~~ 5880 руб.

04.06.2019 109155 318 175

329

Вознаграждение за ответ

Сумма: 4 $m

Добавили:
vechiy (4.00 $m)

Показать полностью

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. Leon75 18.07.18 11:26 Сейчас в теме

Ну воспринимает она (платформа в макете) квадратную скобку как параметр, а если заполнить значение параметра формулой?

2. _root 175 18.07.18 11:46 Сейчас в теме

(1) "С простыми формулами типа "=RC[-2]-RC[-1]" все было замечательно - внести как текст и все ок, но, когда потребовалось реализовать формулу чуть посложнее, типа "=СУММ(R[1]C:R[КоличествоСтрок]C)", то тут ждал облом..."

3. Leon75 18.07.18 12:11 Сейчас в теме

(2)теоретически можно наверное поставить другие два символа вместо открытой и закрытой квадратных скобок, не встречающиеся в формулах и в цикле заменять на скобки.

6. vechiy 35 13.07.21 09:53 Сейчас в теме

(2) а как решить следующую проблему - при внесении формулы как текст и последующей выгрузке в эксель (ТабДок.Записать(.....xls)) - формулы выводятся в ячейка эксель, и "становятся" формулами только после двойного щелчка по каждой ячейке

Прикрепленные файлы:

7. _root 175 13.07.21 10:09 Сейчас в теме

(6) Это значит, что при сохранении в эксель у вас не прошла процедура инициализации каждой ячейки. Инициализация проходит в алгоритме находящемся в #Область ФормированиеExcel.

8. vechiy 35 13.07.21 10:15 Сейчас в теме

(7) так и есть, сохраняю просто как ТабДок.Записать(...эксель)

приведенный код у меня не отрабатывает (возможно, из-за отсутствия эксель на сервере?) Но можно ли как-то это обойти?

Прикрепленные файлы:

9. _root 175 13.07.21 13:54 Сейчас в теме

(6) Это значит, что не
(8)Можно, сделать это на клиенте. Но лучше установить эксель на сервере.

10. vechiy 35 13.07.21 15:10 Сейчас в теме

(9) но сохранять файлы предполагается всегда на клиенте. а серверов будет несколько.
вообще, на сервере сейчас стоит эксель 2016 32 бита, и ожидает регистрации продукта.. может быть в этом проблема? в разрядности или в сбое активации?

15. sewell 29.06.22 11:06 Сейчас в теме

(7) Подскажите, плиз. Никак не могу понять, как мне провести инициализацию каждой ячейки ?
(

16. sewell 29.06.22 13:56 Сейчас в теме

(7) Подскажите, плиз. Никак не могу понять, как мне провести инициализацию каждой ячейки ?

4. ak313 14.05.19 22:53 Сейчас в теме

Может и поздно, но сам искал как вывести Артикул товара в шаблоне наименования в квадратных скобках.
В итоге оказалось все просто.
Символ(91)+[Артикул]+Символ(93)
91 и 93 это коды Unicode для скобок [ и ]

Ответить

5. vechiy 35 12.07.21 16:39 Сейчас в теме

Такая ошибка может быть из-за отсутствия excel на сервере? А можно ли только на клиенте?

Прикрепленные файлы:

11. vechiy 35 13.07.21 21:02 Сейчас в теме

оч нужен совет по ветке https://forum.infostart.ru/forum9/topic265378/#message2682104

12. vechiy 35 13.07.21 23:19 Сейчас в теме

(11)

проблема с записью решена, запись работает прекрасно на клиенте.
осталась проблема с одной формулой - =СУММ(R[-16]C[3]:R[-1]C[3])
она формируется в зависимости от числа строк (16)
и данная формула не "встаёт" в эксель, вместо неё встает сначала ?ИМЯ , а после двойного щелчка уже превращается в формулу. почему так?

13. _root 175 13.07.21 23:51 Сейчас в теме

(12)Не было таких проблем, все формулы вставали без проблем. Вы уверены что для этой ячейки отрабатывает этот участок: "Если СтрНачинаетсяС(Значение, "=") Тогда //Формулам зададим формат..." ?

14. antonimo 17.11.21 09:56 Сейчас в теме

Коллега, приветствую.
Только что решил схожую проблему с сохранением формулы в Excel программно.
Особенность в том, что формулы на русском языке в Excel выводятся для удобства пользователя программы. На самом деле все формулы хранятся на родном английском языке.
Поэтому при вставке формулы программно, нужно писать формулу на английском языке.
Например, СУММ нужно заменить на SUM.
Например,

Cell = Лист.Cells(41, 6);
Cell.FormulaR1C1 = "=SUM(R[-35]C:R[-1]C)";

Все прекрасно работает, а вот с формулой на кириллице ("=СУММ(R[-35]C:R[-1]C)") не работает.

Много времени потратил на это, надеюсь, кому-нибудь сэкономит время.

17. savant 57 07.09.22 15:32 Сейчас в теме

(14)

Cell = Лист.Cells(41, 6);

Спасибо помогло!
Если вам нужно записать диапазон вместо ";" надо ставить ","
Cell.FormulaR1C1 = "=SUM(R[-35]C:R[-1]C,R[-55]C:R[-30]C)";

18. Middle2People 02.04.24 23:15 Сейчас в теме

Я бы на моменте когда осознал ошибку "[]" ОднойСистемы, я бы сразу им бы и написсал и сросил бы, нужна ли помощь в создании такой обработки (если был таким же опытным, спросил бы:) вот в такой форме если ее делать, вот к такому числу.
Сказал бы, что у мен дедлайн и что другую форму могу им отправить вот такого числа, если нужно

Да и вообще поговорить интересно по работе с большими