1С 8.х и Excel. Часть1. Чтение данных из Excel.

Доступ из 1С к Excel производится посредством OLE. Создание COM-объекта:

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

Теперь используя переменную Эксель можно управлять приложением Excel.

• Внимание! Microsoft Excel должен быть установлен на компьютере!

Следующая команда откроет книгу:

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

Перед тем, как начать считывание данных, укажем лист книги, с которого будем считывать данные:

Лист = Книга.WorkSheets(НомерЛиста);

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

КоличествоЛистов = Книга.Sheets.Count;

Лист можно выбрать по имени листа в книге:

Лист = Книга.WorkSheets(ИмяЛиста);

Имя листа в книге можно получить по номеру:

ИмяЛиста = Книга.Sheets(НомерЛиста).Name;

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

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

Получим значения ячейки листа в строке НомерСтроки и в колонке НомерКолонки:

Значение = Лист.Cells(НомерСтроки, НомерКолонки).Value;

Ниже приведен отрывок кода, запустив который мы прочитаем все данные с первой страницы:

Эксель = СоздатьОбъект("Excel.Application");
Книга = Эксель.WorkBooks.Open(ПутьКФайлу);
Лист = Книга.WorkSheets(1);

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

для Строка = 1 по ВсегоСтрок цикл
 
 для Колонка = 1 по ВсегоКолонок цикл
  Значение = СокрЛП(Лист.Cells(Строка,Колонка).Value);
 КонецЦикла;
  
КонецЦикла;

Где ПутьКФайлу - полный путь к файлу книги Excel (включая имя). 

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

Эксель.Application.Quit();