объединение Word документов

[SUPchik]

Здравствуйте!!!
Создаются определённые три Word документа. Как их содержимое слить в один новый документ? Причём так,чтобы когда закончена вставка содержимого первого документа, вставка содержимого второго документа начиналась на новой странице?

[alibek]

Зачем?

[SUPchik]

Дело в том,что с начала было задание делать эти документы по отдельности,которое я выполнил. А теперь преподу пришла мысль сохранять всю информацию сразу в одном документе,но и по отдельности эти документы тоже должны создаваться.

[SUPchik]

Сам спросил,сам и предложу свой вариант.

в событии создания каждого из трех документов в конце вставлял:

Код: Выделить всё

Set myRange(соответств.номер) = objWord(соответ.номер).ActiveDocument.Range 'выделение всего документа
myRange4.Copy 'копия в буфер


Затем при событии объединения всех документов:

Код: Выделить всё

Set objWord = New Word.Application
objWord.Documents.Add
objWord.Visible = True

call Событие_создания_первого_документа
objWord.ActiveDocument.Application.Run MacroName:="MathTypeCommands.UIWrappers.EditPaste" 'вставка из буфера
objWord.Selection.InsertBreak Type:=wdPageBreak 'переход на новую страницу
call Событие_создания_второго_документа
objWord.ActiveDocument.Application.Run MacroName:="MathTypeCommands.UIWrappers.EditPaste"
objWord.Selection.InsertBreak Type:=wdPageBreak
call Событие_создания_третьего_документа
objWord.ActiveDocument.Application.Run MacroName:="MathTypeCommands.UIWrappers.EditPaste"


[alibek]

Я думаю, тебе не нужно так делать. Используй составной документ. Вид - Структура, после чего появится соответствующая панель инструментов.

[SUPchik]

спасибо,попробую рассмотреть твой вариант

[SUPchik]

когда пытаюсь вставить вложенный документ(а он у меня нигде не сохранненный),то выходит ошибка "Файл не найден"
к вложенному документу обращаюсь так:

Код: Выделить всё

objWord.ActiveDocument.Range.Subdocuments.AddFromFile Name:=objWord2.ActiveDocument.FullName


[alibek]

Если он не сохраненный, то почему ты используешь AddFromFile?

[SUPchik]

а как же тогда быть?
мне его не надо сохранять,так как в нем временные данные

[alibek]

А, ну тогда составной документ не подойдет. Он должен состоять именно из сохраненных файлов.
Используй свой первый код.