Помогите добавить трудовой договор в Word

[natalija]

Помогите, пожалуйста, добавить свой трудовой договор в word в ЗУП 1с 8.2.

Помогите, пожалуйста, произвести замены.
выделяю в документе значение, которое необходимо заменить [], а затем в конфигураторе пытаюсь прописать замены. Пример удачных замен:
// Предопределенная функция для внешних печатных форм
//
Функция Печать() Экспорт

    // Получим объект Microsoft Word из макета
    ОбъектВорд = ПолучитьМакет("ТД2").Получить();

    // Получим документ из объекта и активируем его
    Документ = ОбъектВорд.Application.Documents(1);
    Документ.Activate();

    // Поиск и замена маркеров
    Замена = Документ.Content.Find;
   Замена.Execute("[НомерДоговора]", , , , , , , , , СсылкаНаОбъект.НомерДоговора, 2);
   Замена.Execute("[ДоговорДата]", , , , , , , , , СсылкаНаОбъект.ДатаДоговора, 2);
    Замена.Execute("[ОрганизацияНаименованиеПолное]", , , , , , , , , СсылкаНаОбъект.Организация.НаименованиеПолное, 2);
   Замена.Execute("[СсылкаНаОбъект.Физлицо.ИНН]", , , , , , , , , СсылкаНаОбъект.Физлицо.ИНН, 2);
   Замена.Execute("[ТС]", , , , , , , , , СсылкаНаОбъект.ТарифнаяСтавка, 2);                                                                                  
   Замена.Execute("[ДНР]", , , , , , , , , СсылкаНаОбъект.ДатаНачала, 2);
   Замена.Execute("[ДОР]", , , , , , , , , СсылкаНаОбъект.ДатаОкончания, 2);
      
   // Вывод документа
    ОбъектВорд.Application.Visible = Истина;
    ОбъектВорд.Activate();

КонецФункции // Печать()



но у меня не получается прописать следующие замены:
1. ФИО сотрудника
2. адрес сотрудника
3. должность
4. паспортные данные сотрудника
5. руководитель организации

[Klyacksa]

Почему не получается заменить? Что говорит?

[Dethmontt]

Т.к. Найти доходит до места первой замены и если Дата договора раньше чем номер, то он ее не найдет.
//Можно поступить таким образом
Замена = Документ.Content.Find;
Замена.Execute("[НомерДоговора]", , , , , , , , , СсылкаНаОбъект.НомерДоговора, 2);
Замена = Документ.Content.Find;
Замена.Execute("[ДоговорДата]", , , , , , , , , СсылкаНаОбъект.ДатаДоговора, 2);
Замена = Документ.Content.Find;
.....
и т.д.

[natalija]

 Я даже не знаю как правильно прописать путь замены. Я не программист.

[Dethmontt]

Так обратитесь к специалисту - ветка фриланс