|
Как спросить путь перед сохранением в Excel?
| ☑ |
0
Gadin_V
04.04.16
✎
15:08
|
Добрый день, подскажите плж как при выгрузке данный из 1с в Exl файл, что бы он не автоматом сохранялся
Книга.SaveAs("путь куда сохранить")
а выдавал окно где можно будет указать путь куда сохранить, "Сохранить как".
|
|
1
mikecool
04.04.16
✎
15:09
|
(0) смотри параметры у SaveAs
и скорее надо юзать Save
|
|
2
Tatitutu
04.04.16
✎
15:09
|
ВыборКаталога
|
|
3
butterbean
04.04.16
✎
15:10
|
(0) проще в самом начале средствами 1С спросить
|
|
4
Gadin_V
04.04.16
✎
15:10
|
в 2х строчках если не сложно про выбор каталога
|
|
5
vde69
04.04.16
✎
15:10
|
вызвать окно В 1С а в ексель передать выбор пользователя
|
|
6
Чайник Рассела
04.04.16
✎
15:11
|
//***********************************************************************
Процедура ПоКнопкеСохранитьВExcel(Кнопка)
ИмяФайла = ЭтотОбъект.Метаданные().Синоним + " (" +
Строка(Формат(ТекущаяДата(),"ДФ=""дд-ММ-гггг""")) + ")"
+".xls";
ВыборФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
ВыборФайла.Заголовок = "Укажите каталог и название файла для сохранения.";
ВыборФайла.ПолноеИмяФайла = ИмяФайла;
ВыборФайла.Расширение =".xls";
Если ВыборФайла.Выбрать() Тогда
//Сохраним файл
Попытка
ЭлементыФормы.ПолеТабличногоДокументаРезультат.Записать(ВыборФайла.ПолноеИмяФайла,ТипФайлаТабличногоДокумента.XLS);
Исключение
Предупреждение("Не удалось сохранить документ в файл " + ИмяФайла);
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
КонецЕсли;
КонецПроцедуры
|
|
7
Gadin_V
04.04.16
✎
15:12
|
понял, принял, спасибо
|
|
8
Gadin_V
04.04.16
✎
15:54
|
не пойму что должно быть в ЭлементыФормы.ПолеТабличногоДокументаРезультат ,
пишит ошибку Поле объекта не обнаружено (ПолеТабличногоДокументаРезультат)
|
|