Не секрет, что в помощь бухгалтерам было разработано успешное приложение 1С , позволяющее проделывать множественные операции оперативно и максимально эффективно. Однако начинающим бухгалтерам приходится иногда слегка «попотеть», чтобы разобраться со всеми возможностями, которые таит в себе это ПО. Конечно, вникнув в механизм осуществления отдельных операций, разобравшись во всём до мельчайших тонкостей, бухгалтера не только остаются довольными программным обеспечением, но и замечают повышение результативности своего труда.

Одной из насущных проблем, с которой сталкиваются начинающие бухгалтера, не имеющие никакого опыта работы с 1С, является загрузка в 1С из созданного ранее Excel. Действительно, самостоятельно сложно разобраться, как в 1С сохранить документ в Excel, а также проблематично сориентироваться, как из 1С сохранить в Excel, чтобы впоследствии поработать непосредственно с табличным редактором.

Итак, чтобы устранить все проблемы , следует сосредоточиться и изучить инструкции, вникнув в каждый шаг предложенного алгоритма. Безусловно, новичкам не следует проявлять при осуществлении таких манипуляций собственного креатива. Только опытные пользователи могут себе позволить выполнение более сложных операций. Начинающим бухгалтерам сначала нужно просто «набить руку», научиться выполнять действия, при которых удаётся сохранить данные в Excel . Только после этого можно расширять свои познания относительно того, как импортировать Эксель в программу 1С.

Механизмы проведения операций

Хочется ещё отметить, что механизм выполнения желаемых действий может отличаться в зависимости от того, какая версия программы 1С:Бухгалтерия установлена на компьютере. В самых последних версиях этот процесс уже не сопровождается особой проблематичностью. Именно поэтому опытные пользователи рекомендуют отслеживать появление обновлений, а при их обнаружении обязательно программу обновлять. Если на компьютере будет установлена новейшая версия ПО, тогда и разобраться в том, как в 1С выгрузить в Excel или сохранить её в программе, будет проще.

Алгоритм загрузки

Сначала определитесь, что конкретно вы желали бы сохранить в 1С. Откройте таблицу, созданную вами ранее в Excel, проверьте, все ли данные вам важно загрузить в программу. Если какие-то столбцы в табличном документе вам впоследствии не будут нужны, поскольку они не представляют никакой ценности, просто удалите их заранее, чтобы не перегружать программу 1С:Бухгалтерия. После этого не забудьте повторно сохранить отредактированную вами таблицу.

Теперь можно приступить к непосредственным действиям, которые позволяют осуществить выгрузку в 1С из Excel. Откройте сначала саму программу, найдите с левой стороны строку «Справочники», кликните по ней. Откроются дополнительные подразделы, среди которых остановите свой выбор на строке «Номенклатура». Теперь на горизонтальной панели будет расположено меню, в котором найдите «Номенклатура и цены», кликнув по нему, откроется подсписок, в котором вы и обнаружите желаемое слово «Загрузить».

Чтобы импорт завершился успехом, важно обеспечить сохранение загружаемого документа в нужном формате. Допускается импорт в 1С:Бухгалтерию документов, которые вам удалось сохранить в формате Экселя — 2003 или последующих версий. Также документ может быть сохранён в формате mxl и ods. Если вы всё сделали предварительно именно так, тогда можете осуществлять импорт.

Несложно понять, как в 1С сохранить в Excel, нажав на кнопку «Загрузить». На экране возникнет привычное окно загрузки. Остаётся только указать путь, где находится тот документ, который вы желаете загрузить. После того как импорт в 1С из Excel будет завершён, обратите внимание, что в программе он будет точно таким же, каким он был и в табличном редакторе .

На этом импорт завершён, но ваши действия продолжаются, особенно если вы предварительно не отредактировали таблицу, поэтому в ней остались лишние строки и столбцы. Над столбцами вы обнаружите такое предложение, как «Укажите реквизит», нажав на него, нужно будет выбрать один из вариантов, предложенных в списке. После того как вы успешно поработаете с каждым столбиком, просмотрите строки. Если вы обнаружите что-то лишнее, смело удаляйте.

Чтобы проделать такие манипуляции, выделите строку, а затем нажмите на кнопку «Удалить строку».

Изучая инструкции, как выгрузить в 1С из имеющегося Excel, вы легко обнаружите советы относительно того, что после редактирования таблицы, нужно заполнить недостающие данные. Если проделать такие манипуляции со скрупулёзностью, впоследствии работать с программой будет проще. Точно так же проще будет осуществлять поиск.

На этом импорт табличного редактора в программу 1С:Бухгалтерию завершается. Если же вы неукоснительно следуете инструкции, как в 1С выгрузить из Эксель, но что-то идёт не так, убедитесь, что сама программа сопровождается новейшей версией.

Алгоритм выгрузки

Итак, досконально разобравшись, как в 1С загружать документы, созданные ранее в Excel, можно теперь вникнуть и в то, как из 1С сохранить документ в Excel. С такой необходимостью также часто сталкиваются некоторые бухгалтера. К счастью, в новых версиях программы эта возможность не просто имеется, а выполнение таких задач уже сопровождается заметными облегчениями.

Прежде всего, выгруженный документ можно использовать в качестве прайс-листа, который можно направлять компаньонам и поставщикам. Чтобы «заставить» файл выгружаться, первоначально следует пройти по уже знакомому маршруту, открывая сначала «Номенклатур», затем «Номенклатура и цены», а уже в завершении на этот раз строку «Выгрузить». После этого возникнет окно, в котором нужно будет указать колонки, которые вы желали бы видеть впоследствии в Excel.

Также имеется возможность добавлять дополнительные столбцы, на верхней горизонтальной панели для решения таких промежуточных задач расположены кнопки «Добавить» и «Удалить». После того как вы убедились, что все нужные данные задействованы, отмечены, следует нажать кнопку «Выгрузить», указать путь, куда нужно сохранить такой файл и просто дождаться завершения процесса, осуществляемого самой программой.

Долго ожидать не придётся, поскольку операция осуществляется достаточно быстро.

Когда программа возвестит о завершении процесса, останется просто открыть выгруженный файл и убедиться в том, что в нём содержится всё то, что будет нужно для дальнейшей работы. Опытные бухгалтера могут формировать загрузку не одной позиции, а сразу нескольких, исчисляемых не десятками, а целыми сотнями. Благодаря таким действиям значительно экономится время, что приветствуется теми, кому ранее приходилось затрачивать колоссальный временной ресурс, чтобы выполнить такие задачи.

Итак, процесс выгрузки и загрузки документов Excel в программу 1С:Бухгалтерию раннее сопровождался повышенной проблематичностью. В настоящий момент, обновив программу до самой актуальной версии и изучив полезные рекомендации, с такими задачами может справиться любой бухгалтер.

В прошлом уроке мы с Вами рассмотрели .

Однако наиболее распространенный пример – это обмен между бухгалтерией и зарплатой. Эти базы не подчинены друг другу и даже могут быть не связаны изначально.

Все, что нам необходимо – это периодически производить выгрузку из зарплаты в бухгалтерию.

Рассмотрим процесс выгрузки данных из 1С.

Принципы выгрузки и загрузки данных 1С

В Бухгалтерии у документа Реализация товаров и услуг может быть 30 полей. Это бухгалтерский учет, у него свои цели, много полей посвящены плану счетов и субконто.

В Управлении торговлей у того же документа Реализация товаров может быть 25. Это оперативный учет, у него свои цели. А вот счета из плана счетов там не указаны.

Названия у полей в этих двух базах могут быть разные. Тогда как выгрузить один документ из одной базы, а загрузить другой в другую базу?

Для описания каким образом документ должен быть преобразован, чтобы из одной базы он смог загрузиться в другую – существуют правила обмена.

Они представляют собой файл с расширением XML. Для его создания существует специальная конфигурация 1С под названием «Конвертация данных».

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

Сделать выгрузку БУ-ЗП 1С

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

Для того, чтобы это было возможно сделать, необходимо сначала из Бухгалтерии выгрузить в зарплату настройки.

Чтобы сделать выгрузку 1С из Бухгалтерии 1С в Зарплату 1С — выберите в Бухгалтерии пункт меню Сервис/Обмен данных с Зарплатой/Выгрузить данные.

При выгрузке 1С в первый раз не забудьте установить галочку «Сведения для выгрузки 1С в новую информационную базу».

Как загрузить начальные сведения в Зарплату – смотрите в следующей статье Загрузка 1С.

Сделать выгрузку ЗП-БУ 1С

После того, как начальные сведения из Бухгалтерии загружены в Зарплату, из Зарплаты можно выгружать начисления в Бухгалтерию.

В Зарплате выберите меню Сервис/Обмен данными/Выгрузка данных в бухгалтерскую программу.

На форме настройки выгрузки 1С по умолчанию нужно выбрать только период и путь куда нужно выгрузить файл с данными.

Формат выгрузки 1С отображен в виде гиперссылки — синим текстом. Вы можете изменить его нажав на гиперссылку и выбрав другую бухгалтерскую конфигурацию.

Сделать выгрузку БУ-УТ 1С

Чтобы сделать выгрузку 1С из Бухгалтерии в Управление торговлей – необходимо создать настройки обмена. Это позволит делать не только разовые выгрузки 1С, но настроить полноценный периодический обмен, как в .

Чтобы сделать настройки, выберите в Бухгалтерии пункт меню Сервис/Обмен данными с Управление торговлей/Настроить обмен данными.

Настройки создаются с помощью «мастера».

Мы не пойдем простым путем, и проконтролируем все настройки сами, для этого нужно выбрать Экспертный режим работы.

Так как мы создаем настройку с нуля, то выберем «Создать настройку обмена» (соответственно можно «продолжить» если Вы прервали мастер ранее или изменить если мастер был завершен).

Такая настройка обмена делается в двух базах – сначала в одной, потом в другой.

Соответственно выберем «Создать используя файл» если Вы начали делать новую с нуля в Управлении торговлей, а здесь Вам необходимо завершить настройку (аналогично, если начать в Бухгалтерии, то завершать нужно будет в Управлении торговлей).

Настройки для обменов «через файл» простые, и здесь на картинках не представлены. А вот для «прямого» COM соединения примеры здесь.

Пример, если Управление торговлей «файловая» — находится на диске. .

Пример, если Управление торговлей находится на сервере 1С. Название сервера и базы данных такое, .

Путь к файловой базе, а также сервер и имя базы на сервере, отображаются в окне выбора базы данных в 1С.

Здесь необходимо указать, планируется ли загружать что-то из Управления торговлей. Если да – то это «двусторонний» обмен.

Мы можем указать фильтры выгружаемых документов. Например, в разрезе организаций.

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

На этом первая часть настройки завершена. По ее результатам 1С создает файл настроек. Теперь необходимо зайти в Управление торговли и продолжить настройку там, указав вариант «Продолжить с использованием файла» и указать данный файл.

После настройки обмена с обоих базах, 1С предлагает провести первичную выгрузку 1С справочников и провести сопоставление объектов. Это аналог первичной выгрузки 1С в для дальнейшего нормального функционирования обмена.

Обратите внимание на этот момент, если Управление торговлей не пустая база, в ней есть свои справочники, особенно если они уже давно ведутся.

Если Вы не уверены в этом моменте:

• Сделайте бекапы обоих баз (особенно если обмен двусторонний)
• Попросите пользователей не работать в этих базах пока Вы делаете первичную выгрузку 1С (выходные и вечера 🙂
• Сделайте выгрузку 1С, проверьте, что справочники не являются дублированными
• Если что-то не так – вернитесь к бекапу.

Сделать выгрузку УТ-Розница 1С

Типовая конфигурация 1С Розница часто используется совместно с конфигурацией Управление торговлей. Обычно УТ используют в розничных магазинах, а Розница в офисе.

Мы рассматриваем пример настройки обмена УТ редакция 11 с Розницей.

Выберите пункт Администрирование в интерфейсе, далее Обмены данными, пункт Добавить/Создать обмен с конфигурацией Розница.

Настройка обмена делается в двух базах – сначала в одной, потом в другой.

Соответственно выберем «Продолжить» если Вы начали делать новую с нуля в Рознице, а здесь Вам необходимо завершить настройку (аналогично, если начать в Управлении торговлей, то завершать нужно будет в Рознице).

На этой закладке выбирается способ передачи информации между двумя базами – через файл (шара). Пропустите эту страницу, если Вы хотите использовать другой вариант.

На этой закладке выбирается способ передачи информации между двумя базами – через файл (FTP). Пропустите эту страницу, если Вы хотите использовать другой вариант.

Итоговая страница настроек. Чтобы указать уточнения – нажмите кнопку «Настроить ограничения».

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

На закладке соответствий можно настроить соответствие некоторых справочников (магазины = подразделения и кассы).

На этом первый этап настройки завершен. Как результат – создан файл настроек. Вам необходимо завершить настройку в базе Розницы, указав Продолжить с использованием файла.

Данный способ простой. Его суть заключается в том, что объект ТабличныйДокумент имеет методы:

• Записать(< ИмяФайла>, < ТипФайлаТаблицы >) для выгрузки данных в файл;
• Прочитать(< ИмяФайла>, < СпособЧтенияЗначений >) для загрузки данных из файла.

Внимание!

Метод Записать () доступен как на клиенте, так и на сервере. Метод Прочитать () доступен только на стороне сервера. Необходимо помнить об этом
при планировании клиент-серверного взаимодействия.

Рассмотрим пример сохранения табличного документа в файл. Необходимо любым способом создать и заполнить объект ТабличныйДокумент, а выгрузка в файл осуществляется всего лишь одной строкой:

ТабДок. Записать(ПутьКФайлу, ТипФайлаТабличногоДокумента. XLSX );

Здесь ТабДок — сформированный табличный документ, ПутьКФайлу — имя файла для выгрузки, ТипФайлаТабличногоДокумента.XLSX — формат создаваемого файла. Поддерживаются следующие форматы Excel:

• XLS95 — формат Excel 95;
• XLS97 — формат Excel 97;
• XLSX — формат Excel 2007.

ТабДок = Новый ТабличныйДокумент;
ТабДок. Прочитать(ПутьКФайлу, СпособЧтенияЗначенийТабличногоДокумента.Значение );

Здесь ПутьКФайлу — путь к загружаемому файлу Excel. СпособЧтенияЗначенийТабличногоДокумента.Значение определяет, каким образом нужно интерпретировать данные, считываемые из исходного документа. Доступны варианты:

• Значение;
• Текст.

Обмен через OLE

Обмен через технологию OLE automation, пожалуй, самый распространенный вариант программной работы с файлами Excel. Он позволяет использовать весь функционал, предоставляемый Excel, но отличается медленной скоростью работы по сравнению с другими способами. Для обмена через OLE требуется установка MS Excel:

• На компьютере конечного пользователя, если обмен происходит на стороне клиента;
• На компьютере сервера 1С:Предприятие, если обмен происходит на стороне сервера.

Пример выгрузки :

// Создание COM-объекта
Эксель = Новый COMОбъект(«Excel.Application»);
// Отключение вывода предупреждений и вопросов
Эксель. DisplayAlerts = Ложь;
// Создание новой книги
Книга = Эксель. WorkBooks. Add();
// Позиционирование на первом листе
Лист = Книга. Worksheets(1);

// Запись значения в ячейку
Лист. Cells(НомерСтроки, НомерКолонки). Value = ЗначениеЯчейки;

// Сохранение файла
Книга. SaveAs(ИмяФайла);

Эксель. Quit();
Эксель = 0;

Примеры чтения :

// —— ВАРИАНТ 1 ——

// Создание COM-объекта
Эксель = Новый COMОбъект(«Excel.Application» );
// Открытие книги
Книга = Эксель. Workbooks. Open(ПутьКФайлу );

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

// Закрытие книги
Книга. Close(0 );

// Закрытие Эксель и освобождение памяти
Эксель. Quit();
Эксель = 0 ;

// —— ВАРИАНТ 2 ——

// Открытие книги
Книга = ПолучитьCOMОбъект(ПутьКФайлу );
// Позиционирование на нужном листе
Лист = Книга. Worksheets(1 );

// Чтение значения ячейки, обычно здесь располагается цикл обхода ячеек
ЗначениеЯчейки = Лист. Cells(НомерСтроки, НомерКолонки). Value;

// Закрытие книги
Книга. Application. Qui t();

Для обхода всех заполненных строк листа Excel можно использовать следующие приемы:

// —— ВАРИАНТ 1 ——
КоличествоСтрок = Лист. Cells(1 , 1 ). SpecialCells(11 ). Row;
Для НомерСтроки = 1 По КоличествоСтрок Цикл
ЗначениеЯчейки = Лист. Cells(НомерСтроки, НомерКолонки). Value ;
КонецЦикла;

// —— ВАРИАНТ 2 ——
НомерСтроки = 0 ;
Пока Истина Цикл
НомерСтроки = НомерСтроки + 1 ;
ЗначениеЯчейки = Лист. Cells(НомерСтроки, НомерКолонки). Value;
Если НЕ ЗначениеЗаполнено(ЗначениеЯчейки ) Тогда
Прервать;
КонецЕсли;
КонецЦикла;

Вместо последовательного обхода всех строк листа можно выгрузить все данные в массив и работать с ним. Такой подход будет быстрее при чтении большого объема данных:

ВсегоКолонок = Лист. Cells(1 , 1 ). SpecialCells(11 ). Column;
ВсегоСтрок = Лист. Cells(1 , 1 ). SpecialCells(11 ). Row;

Область = Лист. Range(Лист. Cells(1 , 1 ), Лист. Cells(ВсегоСтрок, ВсегоКолонок));
Данные = Область. Value. Выгрузить ();

В таблице ниже приведены наиболее востребованные свойства и методы для работы с Excel через OLE:

Действие	Код	Комментарий
Работа с приложением
Установка видимости окна приложения	Эксель. Visible = Ложь;
Установка режима вывода предупреждений (выводить/не выводить)	Эксель. DisplayAlerts = Ложь;
Закрытие приложения	Эксель. Quit();
Работа с книгой
Создание новой книги	Книга = Эксель. WorkBooks. Add ();
Открытие существующей книги	Книга = Эксель. WorkBooks. Open(ИмяФайла );
Сохранение книги	Книга. SaveAs(ИмяФайла );
Закрытие книги	Книга. Close(0 );
Работа с листом
Установка текущего листа	Лист = Книга. WorkSheets(НомерЛиста );
Установка имени	Лист. Name = Имя ;
Установка защиты	Лист. Protect ();
Снятие защиты	Лист. UnProtect ();
Установка ориентации страницы	Лист. PageSetup. Orientation = 2 ;	1 — книжная, 2 — альбомная
Установка левой границы	Лист. PageSetup. LeftMargin = Эксель. CentimetersToPoints(Сантиметры );
Установка верхней границы	Лист. PageSetup. TopMargin = Эксель. CentimetersToPoints(Сантиметры );
Установка правой границы	Лист. PageSetup. RightMargin = Эксель. CentimetersToPoints(Сантиметры );
Установка нижней границы	Лист. PageSetup. BottomMargin = Эксель. CentimetersToPoints(Сантиметры );
Работа со строками, колонками, ячейками
Установка ширины колонки	Лист. Columns(НомерКолонки). ColumnWidth = Ширина ;
Удаление строки	Лист. Rows(НомерСтроки). Delete ();
Удаление колонки	Лист. Columns(НомерКолонки). Delete();
Удаление ячейки	Лист. Cells(НомерСтроки, НомерКолонки). Delete ();
Установка значения	Лист. Cells(НомерСтроки, НомерКолонки). Value = Значение ;
Объединение ячеек	Лист. Range(Лист. Cells(НомерСтроки, НомерКолонки), Лист. Cells(НомерСтроки1, НомерКолонки1)). Merge ();
Установка шрифта	Лист. Cells(НомерСтроки, НомерКолонки). Font. Name = ИмяШрифта ;
Установка размера шрифта	Лист. Cells(НомерСтроки, НомерКолонки). Font. Size = РазмерШрифта ;
Установка жирного шрифта	Лист. Cells(НомерСтроки, НомерКолонки). Font. Bold = 1 ;	1 — жирный шрифт, 0 — нормальный
Установка курсива	Лист. Cells(НомерСтроки, НомерКолонки). Font. Italic = 1 ;	1 — курсив, 0 — нормальный
Установка подчеркнутого шрифта	Лист. Cells(НомерСтроки, НомерКолонки). Font. Underline = 2 ;	2 — подчеркнутый, 1 — нет

Для того, чтобы узнать какое свойство нужно менять или какой метод вызвать можно воспользоваться макросами Excel. Если записать макрос с требуемыми действиями, то после можно посмотреть программный код на VBA записанного макроса.

Использование COMSafeArray

При выгрузке больших объемов данных из 1С в Excel для ускорения можно использовать объект COMSafeArray . Согласно определению из синтакс-помощника, COMSafeArray — объектная оболочка над многомерным массивом SafeArray из COM. Позволяет создавать и использовать SafeArray для обмена данными между COM-объектами. Проще говоря, это массив значений, который можно использовать для обмена между приложениями по технологии OLE.

// Создание COMSafeArray
МассивКом = Новый COMSafeArray(«VT_Variant» , ВсегоКолонок, ВсегоСтрок );
// Заполнение COMSafeArray
Для Стр = 0 По ВсегоСтрок — 1 Цикл
Для Кол = 0 По ВсегоКолонок — 1 Цикл
МассивКом. SetValue(Кол, Стр, Значение );
КонецЦикла;
КонецЦикла;
// Присвоение области листа Excel значений из COMSafeArray
Лист. Range(Лист. Cells(1 , 1 ), Лист. Cells(ВсегоСтрок, ВсегоКолонок)). Value = МассивКом ;

Обмен через ADO

Файл Excel при обмене через ADO представляет собой базу данных, к которой можно обращаться при помощи SQL-запросов. Установка MS Excel не требуется, но обязательно наличие драйвера ODBC, при помощи которого будет осуществляться доступ. Используемый драйвер ODBC определяется при указании строки соединения к файлу. Обычно требуемый драйвер уже установлен на компьютере.

Обмен через ADO заметно быстрее обмена через OLE, но при выгрузке нет возможности использовать функционал Excel для оформления ячеек, разметки страниц, задания формул и т.д.

Пример выгрузки :

Соединение = Новый COMОбъект(«ADODB.Connection»);

Соединение. ConnectionString = «

|Data Source=»+ ИмяФайла + «;
;
Соединение. Open(); // Открытие соединения

// Создание COM-объекта для команды
Команда = Новый COMОбъект(«ADODB.Command» );
Команда

// Присвоение текста команды для создания таблицы
Команда. CommandText = «CREATE TABLE [Лист1] (Колонка1 char(255), Колонка2 date, Колонка3 int, Колонка4 float)» ;
Команда. Execute(); // Выполнение команды

// Присвоение текста команды для добавления строки таблицы
Команда. CommandText = «INSERT INTO [Лист1] (Колонка1, Колонка2, Колонка3, Колонка4) values (‘абвгдеё’, ‘8/11/2017’, ‘12345’, ‘12345,6789’)» ;
Команда.Execute(); // Выполнение команды

// Удаление команды и закрытие соединения
Команда = Неопределено;
Соединение. Close ();
Соединение = Неопределено ;

Для создания нового листа и формирования его структуры можно воспользоваться объектами ADOX.Catalog и ADOX.Table . В этом случае код примет вид:

// Создание COM-объекта для работы с книгой
Книга = Новый COMОбъект(«ADOX.Catalog» );
Книга. ActiveConnection = Соединение;

// Создание COM-объекта для работы со структурой данных на листе
Таблица = Новый COMОбъект(«ADOX.Table» );
Таблица. Name = «Лист1» ;
Таблица. Columns. Append(«Колонка1» , 202 );
Таблица. Columns. Append(«Колонка2» , 7 );
Таблица. Columns. Append(«Колонка3» , 5 );
Таблица. Columns. Append(«Колонка4» , 5 );

// Создание в книге листа с описанной структурой
Книга. Tables. Append(Таблица);
Таблица = Неопределено;
Книга = Неопределено;

В приведенном примере в методе

Таблица. Columns. Append («Колонка1» , 202 );

во втором параметре указывается тип колонки. Параметр необязательный, вот некоторые значения типа колонки:

• 5 — adDouble;
• 6 — adCurrency;
• 7 — adDate;
• 11 — adBoolean;
• 202 — adVarWChar;
• 203 — adLongVarWChar.

Пример чтения :

// Создание COM-объекта для соединения
Соединение = Новый COMОбъект(«ADODB.Connection» );

// Установка строки соединения
Соединение. ConnectionString = «
|Provider=Microsoft.ACE.OLEDB.12.0;
|Data Source=»+ ИмяФайла + «;
|Extended Properties=»»Excel 12.0 XML;HDR=YES»»;» ;
Соединение. Open(); // Открытие соединения

// Создание COM-объекта для получения выборки
Выборка = Новый COMОбъект(«ADODB.Recordset» );
ТекстЗапроса = «SELECT * FROM [Лист1$]» ;

// Выполнение запроса
Выборка. Open(ТекстЗапроса, Соединение);

// Обход результата выборки
Пока НЕ Выборка. EOF() Цикл
ЗначениеКолонки1 = Выборка. Fields. Item(«Колонка1» ). Value; // Обращение по имени колонки
ЗначениеКолонки2 = Выборка. Fields. Item(0 ). Value; // Обращение по индексу колонки
Выборка. MoveNext();
КонецЦикла;

Выборка. Close();
Выборка = Неопределено;
Соединение. Close();
Соединение = Неопределено;

В строке соединения параметр HDR определяет как будет восприниматься первая строка на листе. Возможны варианты:

• YES — первая строка воспринимается как названия колонок. К значениям можно обращаться по имени и по индексу колонки.
• NO — первая строка воспринимается как данные. К значениям можно обращаться только по индексу колонки.

В приведенных примерах рассмотрено лишь несколько объектов ADO. Объектная модель ADO состоит из следующих объектов:

• Connection;
• Command;
• Recordset;
• Record;
• Fields;
• Stream;
• Errors;
• Parameters;
• Properties.

Выгрузка без программирования

Для сохранения данных из 1С в Excel не всегда целесообразно прибегать к программированию. Если в режиме Предприятия пользователь может отобразить требуемые для выгрузки данные, то, их возможно сохранить в Excel без программирования.

Для сохранения табличного документа (например, результата отчета) можно вызвать команду Сохранить или Сохранить как… главного меню.

В открывшемся окне требуется выбрать каталог, имя и формат сохраняемого файла.

Для сохранения данных динамических списков (например, списка номенклатуры) необходимо:

1. Вывести данные в табличный документ при помощи команды Еще ⇒ Вывести список… ;
2. Сохранить табличный документ в требуемый формат.

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

Данные, которые можно выгружать из 1С

1С любой конфигурации штатно поддерживает выгрузку таких данных как:

• Печатные формы;
• Отчеты;
• Таблицы и списки.

Выгрузка данных из 1С 8.3 возможна во многих популярных форматах:

• Microsoft Excel;
• Microsoft Word;
• Выгрузка в CSV;
• HTML и другие.

Выгрузка печатных форм и отчетов

Любую печатную форму или отчет в 1С можно сохранить в нужном формате. Для этого понадобится открыть форму или отчет, затем выбрать в Главном меню Файл - Сохранить как.

После этого будет открыто окно сохранения файла, в котором указывается имя и тип файла:

Возможные проблемы при выгрузке из 1С

Это связано с тем, что печатная форма или отчет не активизированы в данный момент. Чтобы печатная форма стала доступна для сохранения, требуется просто кликнуть мышкой в любое место на ней:

Выгрузка в Excel

Обработка данных в самом популярном табличном формате требует соответствующей выгрузки. Для того чтобы сохранить нужные данные в формате Excel, необходимо в диалоге сохранения файла указать тип Лист Excel2007-...(*.xlsx). Реже необходимо сохранить данные в старом формате Лист Excel (*.xls):

Аналогично, выбирая нужный формат, можно сделать выгрузку из 1С в PDF, из 1С в WORD, из 1С в CSV, а также в другие форматы.

Выгрузка произвольных таблиц из 1С

В данном разделе будет показано, как можно выгрузить любые данные, при условии, что у вас есть на это права.

В 1С разработан штатный механизм, который позволяет выгрузить любой список (например, список документов или элементы справочника). Для этого в командной панели любого списка, в группе «Еще» доступна команда «Вывести список»:

Информация будет выведена в специальный табличный документ. Этот документ выглядит так же, как любой другой отчет в 1С, и его можно выгрузить точно так же, используя команду Файл – Сохранить как:

Как выгрузить данные, которые не видно в списке

Зачастую, возникшая задача по выгрузке какой-то список, сопровождается необходимостью добавления туда колонок, которые точно есть в документе (справочнике), но их по каким-то причинам не видно в текущем списке. Пример: в списке «Клиенты» добавить для выгрузки поле «Телефон», которое отображается только в дополнительной панели справа:

Чтобы телефон можно было выгрузить из 1С, его все же сначала необходимо добавить в список. Для этого надо вызвать команду «Еще - Изменить форму». Далее нам понадобиться в списке колонок найти нужную. Тут есть одна хитрость: разработчики типовых конфигураций почти всегда добавляют поле «Ссылка». Если встать на него, а затем нажать кнопку то мы увидим все возможные поля этого справочника. Находим поле «Телефон» и ставим у него галочку использования.

После этого базу данных клиентов с телефонами можно выгрузить в файл через штатную команду «Вывести список» и продать конкурентам.

Код 1C v 8.х // Процедура выгружает из указанного справочника данные в режиме экспорта в файл в формате Microsoft Excel
// с указанным именем, используя преобразование данных к типу число и типу строка;
Процедура ОсновныеДействияФормыЭкспорт(Кнопка)
Попытка
Попытка
// Загрузка объекта Microsoft Excel
Состояние("Выгрузка данных из 1С в Microsoft Excel...");
ExcelПриложение = Новый COMОбъект("Excel.Application");
Исключение
Сообщить("Ошибка при запуске Microsoft Excel."
+ Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);
Возврат;
КонецПопытки;

// Создадим книгу, по умолчанию в ней уже есть листы
Книга = ExcelПриложение.WorkBooks.Add();

// Используем первый лист книги Excel
Лист = Книга.WorkSheets(1);

// Сформировать шапку документа в первой строке листа
Колонка = 1;
Для каждого стр из ТП цикл
Если стр.Выгружать Тогда
Лист.Cells(1, Колонка).Value = стр.НазваниеРеквизита;
Колонка = Колонка + 1;
КонецЕсли;
КонецЦикла;

// Выгрузить данные справочника
выборка = Справочники[ИмяСправочника].Выбрать();
СтрокаЛиста = 2;
Пока выборка.Следующий() Цикл
Колонка = 1;
Для каждого стр из ТП цикл

Если стр.Выгружать Тогда
Попытка
// Установить значение в строке и колонке
Если ТипЗнч(выборка[стр.НазваниеРеквизита])=Тип("Число") Тогда
// Установить формат для типа Число
Лист.Cells(СтрокаЛиста, Колонка).NumberFormat = "0,00";

Формат(выборка[стр.НазваниеРеквизита],"ЧГ=0");
иначе
// Для всех других типов установим формат "Текстовый"
Лист.Cells(СтрокаЛиста, Колонка).NumberFormat = "@";
Лист.Cells(СтрокаЛиста, Колонка).Value =
Строка(выборка[стр.НазваниеРеквизита]);
КонецЕсли;
исключение
// в случае ошибки вывести номер строки и колонки
Сообщить("Ошибка установки значения для: " +
выборка[стр.НазваниеРеквизита]);
Сообщить("Стр: " +СтрокаЛиста+ " Кол: " +
Колонка+ " Рек: " + стр.НазваниеРеквизита);
КонецПопытки;
Колонка = Колонка + 1;
КонецЕсли;

КонецЦикла;
СтрокаЛиста = СтрокаЛиста + 1;
Состояние("Экспорт из 1С в Excel " + СтрокаЛиста);
КонецЦикла;

// Сохраним созданную книгу в файл xls
Книга.SaveAs(имяФайла);

// Обязательно закроем соединение с COM объектом для освобождения памяти
ExcelПриложение.Quit();

Сообщить("Файл выгружен успешно: " + имяФайла);

Исключение
// Обработка ошибок экспорта данных из 1С в Excel
Сообщить("Ошибка записи данных файла:" + имяФайла);
Сообщить(ОписаниеОшибки());
Попытка
ExcelПриложение.Quit();
Исключение
КонецПопытки;
КонецПопытки;
КонецПроцедуры
Код 1C v 7.x //Простейший пример вывода из 1С:Предприятия 7.7 в MS Excel. Обеспечение наличия у рабочей книги единственного листа,
//установка размера, жирности и цвета шрифта, ширины колонок, рамок и заливки ячеек. Выравнивание текста
//ячеек, группировка строк, установка числового формата ячеек, закрепление области.

Процедура Вывод()
Попытка
Application=СоздатьОбъект("Excel.Application");
Исключение
Сообщить(ОписаниеОшибки(),"!!!");
Сообщить("Возможно, MS Excel не установлен на этом компьютере.");
Возврат;
КонецПопытки;

//Создание рабочей книги

WorkBook=Application.WorkBooks.Add();
//Получение окна

Window=WorkBook.Windows(1);
//Установка невидимости окна для убыстрения вывода

Window.Visible=0;
//Обеспечение наличия у рабочей книги единственного листа

Если WorkBook.Worksheets.Count=0 Тогда
WorkBook.Worksheets.Add();
Иначе
Application.DisplayAlerts=0;//не выдавать предупреждений

Пока WorkBook.Worksheets.Count>1 Цикл
WorkBook.Worksheets(1).Delete();
КонецЦикла;
Application.DisplayAlerts=-1;//восстановление флага выдачи предупреждений

КонецЕсли;
//Получение рабочего листа

Worksheet=WorkBook.Worksheets(1);
//Задание имени рабочего листа

Worksheet.Name="Пример вывода";

//Заголовок документа

Worksheet.Range("A1").Value="Пример вывода из 1С:Предприятия в MS Excel";
Worksheet.Range("A2").Value="сегодня "+ТекущаяДата();
Worksheet.Range("A1:A2").Font.Size=14;//размер шрифта

Worksheet.Range("A1:A2").Font.Bold=-1;//жирный шрифт

//Задание ширины колонок

Worksheet.Columns(1).ColumnWidth=60;
Worksheet.Columns(2).ColumnWidth=15;
Worksheet.Columns(3).ColumnWidth=15;

//Шапка документа

Worksheet.Range("A4").Value="Первая колонка";
Для ы=7 по 10 Цикл//рамки

Worksheet.Range("A4").Borders(ы).LineStyle=1;
Worksheet.Range("A4").Borders(ы).Weight=-4138;//xlMedium

КонецЦикла;
Worksheet.Range("A4").Interior.ColorIndex=15;//заливка серым

Worksheet.Range("A4").HorizontalAlignment=-4108;//выравнивание текста по центру

Worksheet.Range("B4").Value="Вторая";
Для ы=7 по 10 Цикл
Worksheet.Range("B4").Borders(ы).LineStyle=1;
Worksheet.Range("B4").Borders(ы).Weight=-4138;
КонецЦикла;
Worksheet.Range("B4").Interior.ColorIndex=15;
Worksheet.Range("B4").HorizontalAlignment=-4108;

Worksheet.Range("C4").Value="Третья";
Для ы=7 по 10 Цикл
Worksheet.Range("C4").Borders(ы).LineStyle=1;
Worksheet.Range("C4").Borders(ы).Weight=-4138;
КонецЦикла;
Worksheet.Range("C4").Interior.ColorIndex=15;
Worksheet.Range("C4").HorizontalAlignment=-4108;

//Для группировки строк:
Worksheet.Outline.SummaryRow=0;//"итоговые" строки отображать сверху (если снизу, то 1)

//Вывод строк
Worksheet.Range("A5").Value="Объект аналитики";
Worksheet.Range("A5").Font.ColorIndex=5;//цвет шрифта - синий

Worksheet.Range("B5").Value=123.45;
Worksheet.Range("B5").Font.ColorIndex=5;
Worksheet.Range("C5").Value=678.9;
Worksheet.Range("C5").Font.ColorIndex=5;

Worksheet.Range("A6").Value="Объект аналитики";
Worksheet.Range("A6").Font.ColorIndex=3;//цвет шрифта - красный

Worksheet.Range("B6").Value=123.45;
Worksheet.Range("B6").Font.ColorIndex=3;
Worksheet.Range("C6").Value=678.9;
Worksheet.Range("C6").Font.ColorIndex=3;

Worksheet.Range("A7").Value="Объект аналитики";
Worksheet.Range("B7").Value=123.45;
Worksheet.Range("C7").Value=678.9;

Worksheet.Range("A8").Value="Объект аналитики";
Worksheet.Range("B8").Value=123.45;
Worksheet.Range("C8").Value=678.9;

Worksheet.Range("A9").Value="Объект аналитики";
Worksheet.Range("A9").Font.ColorIndex=3;//цвет шрифта - красный

Worksheet.Range("B9").Value=123.45;
Worksheet.Range("B9").Font.ColorIndex=3;
Worksheet.Range("C9").Value=678.9;
Worksheet.Range("C9").Font.ColorIndex=3;

Worksheet.Range("A10").Value="Объект аналитики";
Worksheet.Range("B10").Value=123.45;
Worksheet.Range("C10").Value=678.9;

Worksheet.Range("A11").Value="Объект аналитики";
Worksheet.Range("B11").Value=123.45;
Worksheet.Range("C11").Value=678.9;

Worksheet.Range("A12").Value="Объект аналитики";
Worksheet.Range("A12").Font.ColorIndex=5;//цвет шрифта - синий

Worksheet.Range("B12").Value=123.45;
Worksheet.Range("B12").Font.ColorIndex=5;
Worksheet.Range("C12").Value=678.9;
Worksheet.Range("C12").Font.ColorIndex=5;

Worksheet.Range("A13").Value="Объект аналитики";
Worksheet.Range("A13").Font.ColorIndex=3;//цвет шрифта - красный

Worksheet.Range("B13").Value=123.45;
Worksheet.Range("B13").Font.ColorIndex=3;
Worksheet.Range("C13").Value=678.9;
Worksheet.Range("C13").Font.ColorIndex=3;

Worksheet.Range("A14").Value="Объект аналитики";
Worksheet.Range("B14").Value=123.45;
Worksheet.Range("C14").Value=678.9;

Worksheet.Range("A15").Value="Объект аналитики";
Worksheet.Range("B15").Value=123.45;
Worksheet.Range("C15").Value=678.9;

Worksheet.Range("A16").Value="Объект аналитики";
Worksheet.Range("A16").Font.ColorIndex=3;//цвет шрифта - красный

Worksheet.Range("B16").Value=123.45;
Worksheet.Range("B16").Font.ColorIndex=3;
Worksheet.Range("C16").Value=678.9;
Worksheet.Range("C16").Font.ColorIndex=3;

Worksheet.Range("A17").Value="Объект аналитики";
Worksheet.Range("B17").Value=123.45;
Worksheet.Range("C17").Value=678.9;

Worksheet.Range("A18").Value="Объект аналитики";
Worksheet.Range("B18").Value=123.45;
Worksheet.Range("C18").Value=678.9;

//Установка рамок

Для НомСтр=5 по 18 Цикл
Для ы=7 по 10 Цикл
Worksheet.Range("A"+НомСтр).Borders(ы).LineStyle=1;
Worksheet.Range("B"+НомСтр).Borders(ы).LineStyle=1;
Worksheet.Range("C"+НомСтр).Borders(ы).LineStyle=1;
КонецЦикла;
КонецЦикла;

//Группировка строк

Worksheet.Range("7:8").Rows.Group();
Worksheet.Range("10:11").Rows.Group();
Worksheet.Range("14:15").Rows.Group();
Worksheet.Range("17:18").Rows.Group();
Worksheet.Range("6:11").Rows.Group();
Worksheet.Range("13:18").Rows.Group();

//Свёртка группировок до первого уровня

Worksheet.Outline.ShowLevels(1);

//Установка числового формата

Попытка
Worksheet.Range("B5:C18").NumberFormat="# ##0.00";

Исключение
Попытка
Worksheet.Range("B5:C18").NumberFormat="# ##0,00";

Исключение
КонецПопытки;
КонецПопытки;

//Установка видимости приложения и его окна

Application.Visible=-1;
Window.Visible=-1;

//Закрепление области

Worksheet.Range("A5").S_elect();
Window.FreezePanes = -1;
КонецПроцедуры //Вывод