Каталог решений - Табличный документ в PDF (через Excel 2007)

Function ExcelToPDF(file) //file - полный путь файла .xls созданный средствами 1с
    Попытка
        Excel =  new  COMObject("Excel.Application");
    Исключение
        Сообщить("Не удалось преобразовать в pdf!!!");
        file="";
    КонецПопытки;
    Попытка  
        Excel.Workbooks.Open(file);
        Excel.ActiveSheet.PageSetup.zoom=false; //уместим на одной странице в ширину
        Excel.ActiveSheet.PageSetup.FitToPagesWide = 1; //уместим на одной странице в ширину
        Excel.ActiveSheet.PageSetup.FitToPagesTall = 10; //и на 10 в длину
        file=лев(file,стрдлина(file)-4)+".pdf"; //подменяем раширение
        Excel.ActiveWorkbook.ExportAsFixedFormat(0, File,0,false,false,,,false,); //сохраняем в pdf 
        //0-pdf, file-полный путь файла, 0 - стандартное качество
        Excel.Quit(); // закрываем Excel
    Исключение
        Excel.Quit();
        Сообщить("Не удалось преобразовать в pdf!!!");
        file="";
    КонецПопытки;
    возврат file;
EndFunction