Событие Application.MailMergeAfterMerge (Word)

Происходит после успешного слияния всех записей в слиянии.

Синтаксис

expression. MailMergeAfterMerge (Doc, DocResult)

выражение: переменная, представляющая объект Application.

Сведения об использовании событий с объектом Application см. в разделе Использование событий с объектом Application.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Док Обязательный Документ Основной документ слияния.
DocResult Обязательный Документ Документ, созданный в результате слияния

Пример

В этом примере отображается сообщение о том, что все записи в указанном документе завершены. Если документ был объединен со вторым документом, сообщение содержит имя нового документа. В этом примере предполагается, что в общих объявлениях объявлена переменная приложения с именем MailMergeApp и задана переменная, равная объекту Word Application.

Private Sub MailMergeApp_MailMergeAfterMerge(ByVal Doc As Document, _ 
 ByVal DocResult As Document) 
 If DocResult Is Nothing Then 
 MsgBox "Your mail merge on " & _ 
 Doc.Name & " is now finished." 
 
 Else 
 MsgBox "Your mail merge on " & _ 
 Doc.Name & " is now finished and " & _ 
 DocResult.Name & " has been created." 
 End If 
End Sub

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.