Пример чтения Excel из 1с 8

Примерный программный код:

Попытка
        Эксель = Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить(ОписаниеОшибки());       
    КонецПопытки;

  
    Книга   = Эксель.Workbooks.Open(Файл);
   
    Лист                = Книга.Worksheets(1);
    ActiveCell          = Лист.Cells(1,1).SpecialCells(11);
    КоличествоСтрок     = ActiveCell.Row;
    //КоличествоКолонок = ActiveCell.Column;
   
    для сч = 1 по КоличествоСтрок Цикл
        Код =  Лист.Cells(сч,  3).Value;
        Если Код=Неопределено Тогда
            Продолжить;
        КонецЕсли;
        Если Лист.Cells(сч,  4).Value = Неопределено Тогда
            КолОст = 0;
        Иначе
            КолОст =  Число(Лист.Cells(сч,  4).Value);
        КонецЕсли;
       
        Если Лист.Cells(сч,  5).Value = Неопределено Тогда
            Кол = КолОст;
        Иначе
            Кол =  число(Лист.Cells(сч,  5).Value);
        КонецЕсли;
       
        Если Кол = Неопределено Тогда
            Продолжить;
        КонецЕсли;
                       
    КонецЦикла;
  
    Книга.Close(Ложь);
    Эксель.quit();