v8: Заполнение полей документа Word (шаблон Active Document)

Пример позволяет заполнить шаблон Microsoft Word как активный документ в 1С:Предприятие 8.0.

Автор статьи: >romix | Редакторы: Последняя редакция №2 от 03.10.07 | История

Ключевые слова: Word, Active Document, ActiveDocument, Application, заполнение, поле


В Конфигураторе

Макеты - правый клик - Добавить
Тип макета: Active document
Создать новый - Документ Microsoft Word

Меню Вставка - Поле - Автоматизация - DocVariable
Написать имя поля в графе "Новое имя:" ДатаПриказа

В модуле формы документа создаем кнопку, и в ее обработчике пишем:

Процедура ОсновныеДействияФормыWord(Кнопка)
   АктивныйДокумент = ПолучитьМакет("Макет");
   КомОбъект = АктивныйДокумент.Получить();
   
   КомОбъект.Application.Visible=1;
   КомОбъект.Variables.Item("ДатаПриказа").Value="24.01.2007";
   КомОбъект.Fields.UpDate();

   КомОбъект.PrintOut(); //распечатать документ
   КомОбъект.Application.Quit(); //закрыть Word
   КомОбъект = 0;
КонецПроцедуры

Меню Вставка-Закладка... Задаем ее имя ("КуКу").

Процедура ОсновныеДействияФормыWord(Кнопка)
   АктивныйДокумент = ПолучитьМакет("Макет");
   КомОбъект = АктивныйДокумент.Получить();
   КомОбъект.Application.Visible=1;
   КомОбъект.Bookmarks(СокрЛП("КуКу")).Select();
   КомОбъект.Application.Selection.TypeText(СокрЛП("крокодил"));
КонецПроцедуры