ДиалогВыбораФайла = новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение); ДиалогВыбораФайла.Фильтр = "Формат XLSX (*.xlsx)|*.xlsx| |Формат PDF (*.pdf)|*.pdf| |Формат DOCX (*.docx)|*.docx| |Формат HTML (*.html)|*.html| |Формат TXT (*.txt)|*.txt"; Если ДиалогВыбораФайла.Выбрать() Тогда // выгружаем в табличный документ ТД = новый ТабличныйДокумент; НомерСтроки = 1; для каждого СтрТЧ из ТаблицаНаФорме цикл ТД.Область(НомерСтроки,1,НомерСтроки,1).Текст = СтрТЧ.Номер; ТД.Область(НомерСтроки,2,НомерСтроки,2).Текст = СтрТЧ.Наименование; ТД.Область(НомерСтроки,3,НомерСтроки,3).Текст = СтрТЧ.Сумма; НомерСтроки = НомерСтроки + 1; КонецЦикла; // получить расширение Файл = новый Файл(ДиалогВыбораФайла.ПолноеИмяФайла); // определить тип файла Если Врег(Файл.Расширение) = ".XLSX" тогда ТипФайла = ТипФайлаТабличногоДокумента.XLSX; КонецЕсли; Если Врег(Файл.Расширение) = ".DOCX" тогда ТипФайла = ТипФайлаТабличногоДокумента.DOCX; КонецЕсли; Если Врег(Файл.Расширение) = ".PDF" тогда ТипФайла = ТипФайлаТабличногоДокумента.PDF; КонецЕсли; Если Врег(Файл.Расширение) = ".HTML" тогда ТипФайла = ТипФайлаТабличногоДокумента.HTML; КонецЕсли; Если Врег(Файл.Расширение) = ".TXT" тогда ТипФайла = ТипФайлаТабличногоДокумента.TXT; КонецЕсли; ТД.Записать(ДиалогВыбораФайла.ПолноеИмяФайла, ТипФайла); // Открытие ЗапуститьПриложение(ДиалогВыбораФайла.ПолноеИмяФайла); КонецЕсли;