Как загрузить данные из Excel в 1С 8? 1C 8.x Excel 1с 8 примеры

Как загрузить данные из Excel в 1С 8? Рассмотрим пример. Дан Excel файл:

Создадим обработку в 1С 8:

Код обработки:

Процедура КнопкаВыполнитьНажатие(Кнопка) Попытка ExcelObj = Новый COMОбъект(«Excel.Application»); //Укажите свой путь к Excel файлу!!! РабочаяКнига = ExcelObj.WorkBooks.Open(«H:Книга1»); Лист = РабочаяКнига.Sheets(1); макет = ПолучитьМакет(«Табл»); шапка = макет.ПолучитьОбласть(«шапка»); РС = макет.ПолучитьОбласть(«РС»); табДок = Новый ТабличныйДокумент; табДок.Вывести(шапка); // цикл по строкам Для НомерСтроки = 2 По 3 Цикл курВал = Лист.Cells(НомерСтроки, 1).Value; если курВал = Неопределено тогда прервать; конецЕсли; РС.Параметры.наим = Лист.Cells(НомерСтроки, 1).Value; РС.Параметры.кол = Лист.Cells(НомерСтроки, 3).Value; табДок.Вывести(РС); конецЦикла; табДок.ТолькоПросмотр = Истина; табДок.Показать(«Загрузка из Excel»); ExcelObj.Quit(); Исключение Сообщить(«Ошибка » + ОписаниеОшибки()); КонецПопытки; КонецПроцедуры

В процедуре КнопкаВыполнитьНажатие(Кнопка) в строке РабочаяКнига = ExcelObj.WorkBooks.Open(«H:Книга1»); укажите свой путь к Excel файлу. Получаем

такой результат.