Выгрузка из 1С в Excel

Как выгрузить данные из 1С в эксель? Очень просто! Код, размещённый ниже, поможет подключиться к Excel, создать книгу Excel из 1С и лист.

Лист можно заполнить данными и сохранить файл на носителе.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
// Подключаемся к Excel
Подключено = Ложь;
 
Попытка
     ExcelПриложение = Новый COMОбъект("Excel.Application");
     Подключено = Истина;
Исключение
     Сообщить(ОписаниеОшибки());
КонецПопытки;
 
Если Подключено Тогда
     // Готовим книгу и листы
     Книга = ExcelПриложение.WorkBooks.Add();
     Лист = Книга.WorkSheets(1);
 
     // Заполняем строку файла.
     // Заполняются три ячейки в первой строке.
     Лист.Cells(1, 1).Value = "Номенклатура";
     Лист.Cells(1, 2).Value = "Количество";
     Лист.Cells(1, 3).Value = "Цена";
 
     // Путь - это значение реквизита, в котором указан путь к месту сохранения файла.
     ФайлНаДиске = Новый Файл(Путь + "айл.xlsx");
 
     Попытка
          ExcelПриложение.DisplayAlerts = False;
          Книга.SaveAs(ФайлНаДиске.ПолноеИмя);
          ExcelПриложение.ActiveWorkbook.Close();
          // Обязательно закрываем эксель, иначе процесс EXCEL.exe так и будет висеть в памяти.
          ExcelПриложение.Quit();
 
          Сообщить("Файл выгружен успешно: "  + ФайлНаДиске.ПолноеИмя);
     Исключение
          Сообщить("Ошибка записи данных файла: " + ФайлНаДиске.ПолноеИмя);
          Сообщить(ОписаниеОшибки());
          Попытка
               ExcelПриложение.Quit();
          Исключение
          КонецПопытки;
     КонецПопытки;
КонецЕсли;

Выгрузка из 1С в Excel: 2 комментария

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

Можно использовать следующие HTML-теги и атрибуты: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>

WP-SpamFree by Pole Position Marketing