Excel макет в внешней печатной форме.
10.06.2011
12:20
#1
"Здравствуйте. Есть такой вопрос. Использую в качестве макета внешней печатной формы документ Excel. Вызываю его вот так:
"возврат неопределено" - это для функции Печать(). Так вот Excel открывается и сразу закрывается. Как его оставить открытым?"
Документ.Application.Workbooks(1).Windows(1).Visible = true; Документ.Application.Visible = Истина; Документ.Activate(); Возврат Неопределено;КонецФункции;
"возврат неопределено" - это для функции Печать(). Так вот Excel открывается и сразу закрывается. Как его оставить открытым?"
10.06.2011
13:07
#3
А где переменная "Документ" определена? Если она только в процедуре, то естественно, что после выхода из процедуры все переменные уничтожаются.
10.06.2011
13:10
#4
"объявил ее в модуле как глобальную.
перем Клиент, Сумма, Дата;
перем Документ Экспорт;
Функция Печать(СсылкаНаОбъект, ТабДокумент) Экспорт
ТабДокумент = Неопределено;
Клиент = СокрЛП(Строка(СсылкаНаОбъект.Заказчик.НаименованиеПолное));
Сумма = СокрЛП(Строка(СсылкаНаОбъект.СуммаДокумента));
Дата = СокрЛП(Строка(Формат(СсылкаНаОбъект.ДатаОкончания, "ДФ=""""дд ММММ гггг 'г.'""""")));
АктивныйДокумент = ПолучитьМакет("ПриложениеКДоговоруПодмены");
Документ = АктивныйДокумент.Получить();
Ячейка = Документ.worksheets(1).Cells(4, "k"); // Получим ячейку
Ячейка.Value = Клиент;
Документ.Application.Workbooks(1).Windows(1).Visible = true;
Документ.Application.Visible = Истина;
Документ.Activate();
Возврат Неопределено;
КонецФункции;
Мне кажется она теряется из-за того, что обработка внешняя."
перем Клиент, Сумма, Дата;
перем Документ Экспорт;
Функция Печать(СсылкаНаОбъект, ТабДокумент) Экспорт
ТабДокумент = Неопределено;
Клиент = СокрЛП(Строка(СсылкаНаОбъект.Заказчик.НаименованиеПолное));
Сумма = СокрЛП(Строка(СсылкаНаОбъект.СуммаДокумента));
Дата = СокрЛП(Строка(Формат(СсылкаНаОбъект.ДатаОкончания, "ДФ=""""дд ММММ гггг 'г.'""""")));
АктивныйДокумент = ПолучитьМакет("ПриложениеКДоговоруПодмены");
Документ = АктивныйДокумент.Получить();
Ячейка = Документ.worksheets(1).Cells(4, "k"); // Получим ячейку
Ячейка.Value = Клиент;
Документ.Application.Workbooks(1).Windows(1).Visible = true;
Документ.Application.Visible = Истина;
Документ.Activate();
Возврат Неопределено;
КонецФункции;
Мне кажется она теряется из-за того, что обработка внешняя."
14.06.2011
07:46
#8
"Ну что? Не поверил с первого раза
//Документ.Application.Workbooks(1).Windows(1).Visible = true; //Документ.Application.Visible = Истина; //Документ.Activate(); ПолноеИмяФайлаДокумента = ПолучитьИмяВременногоФайла("xls"); Документ.SaveAs(ПолноеИмяФайлаДокумента); ЗапуститьПриложение("explorer " +ПолноеИмяФайлаДокумента); Возврат Неопределено;//КонецФункции " Остатки и обороты в 1с8.2Как организовать учет у организации-агента на УСН в типовой Бухгалтерии 2.0?
Читают тему
(гостей: 1)