// ===============================
// Заполнение ячейки в эксель-таблице:
//   параметры:
//    1    xl - объект Эксель = СоздатьОбъект("Excel.Application");;
//    2    Стр - строка, в к-рую помещаем данные
//    3    Кол - колонка, в к-рую помещаем данные
//    4    Значение - данные, к-рые помещаем в выбранную ячейку
//  5    шрифтРазм - размер шрифта в ячейке
//    6    шрифтЖирн - шрифт жирный / не жирный
//    7    гориз - выравнивание по горизогтали 
//      1 - по значению, 2 - по левому краю, 3 - по центру
//    8    вертик -     -"-        -"- вертикали    
//      1 - верх, 2 - центр, 3 - низ)
//    9    перенос - есть ли перенос по словам 
//        1 - переносить, 0 - не переносить)
//    10    линия - стиль линии обрамления ячейки 
//        1 - обычная непрерывная линия
//        2 - пунктир плотный
//        3 - пунктир более разреженный
//        4 - пунктир (типа осевой) --.--.--.--
//        5 -   -"-    -"-          --..--..--..--
//        6 -   -"-    -"-          --.--.--.-- более жирный
//        7 - тонкая сплошная
//        8 - пунктир из коротких пунктиров
//        9 - двойная тонкая сплошная
//
Процедура ПоместитьЗначение(xl,Стр,Кол,Значение, шрифтРазм = 9, шрифтЖирн = 0, гориз = 2, вертик = 1, перенос = 1, линия = 0);

    Ячейка = xl.Cells(Стр,Кол);
    Ячейка.Value = Значение;
    Ячейка.Font.Size = шрифтРазм;
    Ячейка.Font.Bold = шрифтЖирн;
    Ячейка.HorizontalAlignment = гориз;
    Ячейка.VerticalAlignment = вертик;
    Ячейка.WrapText = перенос;
    Ячейка.Borders.Linestyle = линия;

КонецПроцедуры

// делаем Эксель невидимым:
    Эксель.ScreenUpdating = 0;
    Эксель.EnableEvents = 0;
    Эксель.Visible = 0;

// как выделить область:
    область = лист.Range(лист.Cells(текСтрока, 1), лист.Cells(текСтрока, 16));
    
// Borders():   1 - лево, 2 - право, 3 - верх, 4 - низ
// Weight:        1 - линия из точек, 2 - тонкая сплошная, 3 - чуть толще тонкого

   область.Borders(3).Weight = 3;

// выбор нужного листа:
    Если СоздаватьНовыйФайл = 1 Тогда    
        лист = книга.WorkSheets.Add();
        лист = книга.WorkSheets(1);
        лист.Name = "Шаблон";
    Иначе
        лист = книга.WorkSheets("Шаблон");
    КонецЕсли;    

// задание высоты сроки:
    лист.Rows(текСтрока).RowHeight = 60;
// задание ширины колонки    
    лист.Columns(1).ColumnWidth  = 13.57;