как в ворде добавлять страницу?

☑

0 AJ_81

11.07.07

✎

11:28

делается через обработку 1С

1 IUnknown

11.07.07

✎

11:37

в смысле добавить страницу? (разрыв страницы)

2 AJ_81

11.07.07

✎

11:45

Например в цикле, крутишь цикл и доабляешь страницы, как это сделать, никто не знает?

3 dk

11.07.07

✎

11:53

(2) Ну и крути в цикле со вставкой разрыва страницы или кучей TypeParagraph

4 IUnknown

11.07.07

✎

11:54

олеВорд = создатьобъект("Word.Application");
олеВыбор = олеВорд.Selection;
олеДокумент = олеВорд.Documents.Add();
// Вставить разрыв до следующей страницы
wdSectionBreakNextPage = 2;
олеВыбор.InsertBreak(wdSectionBreakNextPage);
// Вставить разрыв страницы
wdPageBreak = 7;
олеВыбор.InsertBreak(wdPageBreak);

5 AJ_81

11.07.07

✎

14:24

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

Выборка = СформироватьЗапросДляПечати().Выбрать();

ПриказОПриеме = ПолучитьОбщийМакет("ПриказОПриемеНаРаботу");
MSWord = ПриказОПриеме.Получить();
Документ = MSWord.Application.Documents(1);
Документ.Activate();
// Начинаем формировать выходной документ
Пока Выборка.Следующий() Цикл
Документ.Application.NewDocument;
Попытка

Замена = Документ.Content.Find;
Замена.Execute("Сотрудник", Ложь, Истина, Ложь, , , Истина, , Ложь, ФИО(СтруктураФИО, 0));

ДатаДоговораКаз = Формат(Выборка.ДатаДоговора, "Л=kk_KZ; ДЛФ=DD");
ДатаДоговораКаз2 = СтруктураДата(ДатаДоговораКаз);
ДатаДоговора = СклонениеДаты(ДатаДоговораКаз2);

MSWord.Application.Visible = Истина;
MSWord.Activate();
Исключение
Сообщить(ОписаниеОшибки());
MSWord.Application.Quit();
КонецПопытки

6 AJ_81

12.07.07

✎

14:41

например есть шаблон в общем макете, и есть документ прием на работу, при печати на печать выводиться из этого шаблона, если один сотрудник без проблем работает, но если в одном докменте несколько сотрудников, то в шаблоне надо вывести несколько сотрудников, тока каждого в отдельном листе, вот что имеется ввиду. Заранее спасибо