Построение бухгалтерской отчетности в MS Excel с помощью языка формул 1С 7.7 в режиме онлайн
Учетные задачи - Регламентированный учет и отчетность
Бесплатные
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Узнавайте о новых бесплатных решениях в нашей телеграм-группе Инфостарт БЕСПЛАТНО
Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Настоящий инструментарий предназначен для построения бухгалтерской отчетности в MS Excel по нестандартному плану счетов. Например, это может быть дополнительный план счетов (МСФО, GAAP, управленческий, корпоративный) или же сильно изменённый российский план счетов.
Отчеты формируются в режиме реального времени на основании данных, получаемых из программы «1С» в соответствии с формулами языка «1С», содержащимися в примечаниях к ячейкам MS Excel, и в пределах периода, задаваемого в верхних строках листа файла-шаблона. Могут быть заданы разные периоды для разных колонок, например, для данных по текущему и по прошлому годам.
Значение каждой ячейки файла-шаблона FinReports.xls рассчитывается как бухгалтерский итог по счетам посредством языка формул программы «1С»:
БухИтоги.СНД("КодСчета")
БухИтоги.СНК("КодСчета")
БухИтоги.СКД("КодСчета")
БухИтоги.СКК("КодСчета")
БухИтоги.ДО("КодСчета")
БухИтоги.КО("КодСчета")
БухИтоги.ОБ("КодСчетаДт","КодСчетаКт")
Для выгрузки информации в файл-шаблон используется специальный макрос Formulae1C.xla на языке MS Visual Basic, встраиваемый в MS Excel. Подключение макроса осуществляется следующим образом:
- выбрать в меню MS Excel: Сервис -> Надстройки;
- подключить файл Formulae1C.xla с помощью кнопки «Обзор»;
- переместить вновь появившуюся панель «RayCon Reporter for 1C» с двумя кнопками («Evaluate Finance Formulas» и «About») в любое удобное место меню рядом с другими активированными панелями MS Excel.
Файл-шаблон FinReports.xls предназначен для построения бухгалтерских отчетов в программе MS Excel. Он представляет собою книгу MS Excel, которая может состоять из нескольких листов, например:
- Лист «Баланс» – Бухгалтерский баланс (форма 1);
- Лист «ОПУ» – Отчет о прибылях и убытках (форма 2);
- Лист «ОДДС» – Отчет о движении денежных средств (форма 4).
Вызов файла-шаблона FinReports.xls следует встроить в меню программы «1C:Бухгалтерия». Для этого надо сделать следующее:
- В каталоге ExtForms информационной базы создать подкаталог XLS и поместить в него файл-шаблон FinReports.xls.
- Встроить в Глобальный модуль следующую процедуру:
Процедура ОткрытьЛистЭксел(ИмяФайла, НомерЛиста=1)
Если ПустаяСтрока(ИмяФайла)=1 Тогда
Возврат;
КонецЕсли;
Если Нрег(Прав(ИмяФайла,4))<>".xls" Тогда
Возврат;
КонецЕсли;
Если ФС.СуществуетФайл(ИмяФайла)=0 Тогда
Предупреждение("Не найден файл : "+ ИмяФайла);
Возврат;
КонецЕсли;
Если НомерЛиста = 0 Тогда
НомерЛиста = 1;
КонецЕсли;
Попытка
_wndExcel=СоздатьОбъект("Excel.Application");
Исключение
Предупреждение("1С не может подключиться к MS Excel");
Возврат;
КонецПопытки;
_newBook=_wndExcel.Workbooks;
_CopyBook=_newBook.Open(ИмяФайла);
ЧислоЛистов=_CopyBook.Worksheets().count;
Если НомерЛиста > ЧислоЛистов Тогда
НомерЛиста = ЧислоЛистов;
КонецЕсли;
_workBook=_CopyBook.Sheets(НомерЛиста).Select();
_wndExcel.Visible=-1;
КонецПроцедуры
- В меню программы «1С» создать новый пункт «Бухгалтерские отчеты в MS Excel» и встроить в поле формулы вызов указанной процедуры и путь к файлу-шаблону:
ОткрытьЛистЭксел(КаталогИБ() + "ExtForms\XLS\FinReports.xls", 1)
Порядок построения отчета в MS Excel:
- Открыть файл-шаблон FinReports.xls на листе с соответствующим отчетом.
- Заполнить для каждой колонки с данными служебные ячейки, помеченные красным шрифтом:
2.1. Идентификатор плана счетов (при наличии нескольких планов счетов).
2.2. Даты начала и конца периода, за который строится отчет. - Запустить формирование отчета из пункта меню «Evaluate Finance Formulas» панели «RayCon Reporter for 1C» программы MS Excel.
- Файл со сформированными отчетами рекомендуется сохранить под именем, указывающим на организацию и период формирования отчетов, например: «ИмяКомпании_Январь_2008.xls».
Авторы разработки:
Конюшкин Андрей – разработка макроса MS VB для построения онлайн отчетов из программы «Инотек Бухгалтер» в MS Excel по каналу DDE
Фёдоров Станислав – портирование из «Инотек Бухгалтер» на «1С»
Казиев Марат – процедура вызова макроса из «1С»
Конюшкин Андрей – доработка под использование дополнительного плана счетов в «1С»
Вступайте в нашу телеграмм-группу Инфостарт
См. также
5084 руб.
20.10.2014 131341 234 136
10 стартмани
14.04.2026 9068 254 vik80111 143
1 стартмани
27.01.2021 12191 21 victuan 2
1 стартмани
21.03.2019 35382 88 MadDAD 347
1 стартмани
20.09.2016 33530 13 aserg 4
1 стартмани
10.06.2016 54853 238 gubanoff 17
1 стартмани
26.12.2015 46079 0 victuan 14
