Цитата(rus80629 @ 16.07.14, 21:40)

//    Ном = база8.Перечисления.СтавкиНДС.Индекс(стр.СтавкаНДС);
//    Имя = база8.Метаданные().Перечисления.СтавкиНДС.EnumValues.Get(Ном).Name;

Например:
// Получить ставку НДС по объекту СтавкаНДС из 8.2
//  входящий параметр - ссчылка на реквизит "СтавкаНДС" из документа или элемента справочника 8.2
//
Функция ПолучитьВидНДС(инСтавкаНДС)
    Перем ном, имя;
    
    Если ПустоеЗначение(инСтавкаНДС) = 0 Тогда
        
        Попытка
            ном = база8.Перечисления.СтавкиНДС.Индекс(инСтавкаНДС);        // номер значения перечисления в 8.2
            имя = база8.Метаданные().Перечисления.СтавкиНДС.EnumValues.Get(Ном).Name;    // имя значения перечисления в 8.2
        Исключение
            // если попали в эту ветку, значит в исходном документе СтавкаНДС не определена
            имя = "БезНДС";
        КонецПопытки;    
        
        Если спрНиО.НайтиПоКоду(имя, 0) = 1 Тогда
            Возврат спрНиО.ТекущийЭлемент();
        Иначе    // в 8.2 есть "НеНДС"
            Если спрНиО.НайтиПоКоду(имя, 0) = 1 Тогда
                Возврат спрНиО.ТекущийЭлемент();
            КонецЕсли;
        КонецЕсли;
    Иначе    
        Возврат ПолучитьПустоеЗначение("Справочник.НалогиОтчисления");
    КонецЕсли;     
    
КонецФункции

// ===============================
// Заполнение ячейки в эксель-таблице:
//   параметры:
//    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;