Как объединить 2 документа word так чтобы каждый сохранил все свои форматы. Допустим у первого есть клон титулы, а у второго их нету. Вот и после объедения на страницах со второго документа их не должно быть.
С документами связь через Com
---
```1c
    ДокументWord = Новый COMОбъект("Word.Application");
    Документ = ДокументПWord.Documents.Open(ИмяП);
    ДокументWord.Selection.EndKey(6); //курсор в конец документа
    ДокументWord.Application.Selection.InsertBreak(2); //Вставляем разрыв разделов (2), для разрыва страницы используем (7)
    ДокументWord.Application.Selection.InsertFile(ИмяФайла,,, Ложь); //Вставляем второй документ
```

Но Если во втором документе есть разрывы страниц, тогда после разрыва будет общий колонтитул. У меня он был поэтому сделал так

```1c
    //ДокументWord это первый документ он уже открыт
    ДокументПWord = Новый COMОбъект("Word.Application");
    ДокументП = ДокументПWord.Documents.Open(ИмяП); // открываем второй документ
    ДокументWord.Selection.EndKey(6);
    ДокументWord.Application.Selection.InsertBreak(2);

    ДокументП.Bookmarks("\page").Range.Select(); // выделение текущей страницы
    ДокументПWord.Selection.Copy(); //Копируем страницу

    ДокументWord.Selection.PasteAndFormat(16); //Вставляем

    //Переходим в конец второго дока так как у меня было 2 страницы
    // Вы можете удалить ранее выделенную страницу
    //ДокументПWord.Selection.Delete();
    // и выделит снова первую

    ДокументПWord.Selection.EndKey(6);
    ДокументП.Bookmarks("\page").Range.Select(); // выделение текущей страницы
    ДокументПWord.Selection.Copy();

    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select(); //выделяю абзац там где разрыв страницы
    ДокументWord.Selection.Delete(); //Удаляю абзац
    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select();
    ДокументWord.Selection.Delete();
    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select();
    ДокументWord.Selection.Delete();

    ДокументWord.Application.Selection.InsertBreak(2);
    ДокументWord.Selection.PasteAndFormat(16);
```
---
Колонтитулы такая сущность что насколько мне знаком ворд, то они либо есть, либо нет. Есть настройки отличия первой страницы, четных/нечетных, но так чтобы в половине есть а дальше нет - такого не получается сделать (во всяком случае я не нашел). Какой физический смысл данного действия?
---
во втором документе приложение и смета, хочется по почте отправить все вместе, но в 1с есть печать она формирует по отдельности эти доки, вот мне лень делать еще один макет ворд и выборку данных только для него.
---
Ну так прикладывайте несколько документов/файлов к письму.
---
Начальство хочет один)
---
Запихните их в архив! =D
---
```1c
    ДокументWord = Новый COMОбъект("Word.Application");
    Документ = ДокументПWord.Documents.Open(ИмяП);
    ДокументWord.Selection.EndKey(6); //курсор в конец документа
    ДокументWord.Application.Selection.InsertBreak(2); //Вставляем разрыв разделов (2), для разрыва страницы используем (7)
    ДокументWord.Application.Selection.InsertFile(ИмяФайла,,, Ложь); //Вставляем второй документ
```

Но Если во втором документе есть разрывы страниц, тогда после разрыва будет общий колонтитул. У меня он был поэтому сделал так

```1c
    //ДокументWord это первый документ он уже открыт
    ДокументПWord = Новый COMОбъект("Word.Application");
    ДокументП = ДокументПWord.Documents.Open(ИмяП); // открываем второй документ
    ДокументWord.Selection.EndKey(6);
    ДокументWord.Application.Selection.InsertBreak(2);

    ДокументП.Bookmarks("\page").Range.Select(); // выделение текущей страницы
    ДокументПWord.Selection.Copy(); //Копируем страницу

    ДокументWord.Selection.PasteAndFormat(16); //Вставляем

    //Переходим в конец второго дока так как у меня было 2 страницы
    // Вы можете удалить ранее выделенную страницу
    //ДокументПWord.Selection.Delete();
    // и выделит снова первую

    ДокументПWord.Selection.EndKey(6);
    ДокументП.Bookmarks("\page").Range.Select(); // выделение текущей страницы
    ДокументПWord.Selection.Copy();

    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select(); //выделяю абзац там где разрыв страницы
    ДокументWord.Selection.Delete(); //Удаляю абзац
    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select();
    ДокументWord.Selection.Delete();
    ДокументWord.Selection.EndKey(6);
    Документ.Bookmarks("\Para").Range.Select();
    ДокументWord.Selection.Delete();

    ДокументWord.Application.Selection.InsertBreak(2);
    ДокументWord.Selection.PasteAndFormat(16);
```
---
здравствуйте.
а у PasteAndFormat может быть несколько параметров?
---
клон титулы можно делать разные благодаря разрыву разделов
---
Спасибо нашел, но вот в жизни не использовал данный функционал :)