|
Внешняя печатная форма на основе Active Document | ☑ | ||
|---|---|---|---|---|
|
0
Zanzarchik
12.08.12
✎
17:41
|
Здравствуйте, волшебники 1С! Помогите, пожалуйста, разобраться с ActiveDocument. Такая вот ситуация у меня: создаю внешнюю печатную форму, н-р, для перемещения товаров (неважно). Макет этой печатной формы я создаю на основе шаблона Excel через ActiveDocument. Вот код, прописанный в модуле объекта моей внешней обработки:
///////////////////////////////////////////////////////////// перем ДокументДляЭксэль Экспорт; перем АктивныйДокумент Экспорт; Функция Печать()Экспорт Объект = СсылкаНаОбъект.ПолучитьОбъект(); ТЧ = Объект.Товары; НашаОрганизация = Объект.Организация.Наименование; АктивныйДокумент = ПолучитьМакет("Макет"); ДокументДляЭксэль = АктивныйДокумент.Получить(); ЯчейкаОрганизация = ДокументДляЭксэль.worksheets(1).Range("Организация"); ЯчейкаОрганизация.Value = НашаОрганизация; ОбластьСтроки = ДокументДляЭксэль.worksheets(1).Range("Строка"); Строка = 1; Для каждого Стр Из ТЧ Цикл ОбластьСтроки.Cells(Строка,1).Value = Стр.НомерСтроки; ОбластьСтроки.Cells(Строка,11).Value = Стр.Количество; ОбластьСтроки.Cells(Строка,15).Value = Стр.ЦенаВРознице; ОбластьСтроки.Cells(Строка,18).Value = Стр.ЦенаВРознице*Стр.Количество; Строка = Строка + 1; КонецЦикла; ДокументДляЭксэль.Application.Visible = true; ДокументДляЭксэль.Application.Workbooks(1).Windows(1).Visible = true; ДокументДляЭксэль.Activate(); Возврат Неопределено; КонецФункции ///////////////////////////////////////////////////////////// Когда я использую просто внешнюю обработку - все работает, документ выводится на экран с заполненными параметрами. Если я подцепляю эту печатную форму к документу, то Excel открывается и сразу же закрывается. На этом форуме есть подобные темы, н-р: v8: Не получается открыть Active document Excel Только предложенные там решения мне не помогли. Поэтому вопрос: как сделать так, чтобы печатная форма показывалась и не закрывалась? |
|||
|
1
aleks-id
12.08.12
✎
17:46
|
если планируешь переводить на Управляемое приложение, то забудь о макете АД. храни как двоичные данные.
|
|||
|
2
Zanzarchik
12.08.12
✎
20:12
|
Спасибо, aleks-id. Но пока не планирую переводить на управляемое. Просто хочу разобраться с интересным вопросом. Знаю, что есть обработка по конвертации из .xls в .mxl. Но все же, как решить мою задачу? Может еще кто подскажет?
|
| Форум | Правила | Описание | Секции | Поиск |