Application.MailMergeAfterRecordMerge 事件 (Publisher)
會在合併列印時資料來源中的所有記錄都已成功合併之後發生。
語法
運算式。MailMergeAfterRecordMerge (Doc)
expression 代表 Application 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
Doc | 必要 | Document | 合併列印主文件。 |
註解
若您保有客戶管理資料庫,您可以使用 MailMergeAfterRecordMerge 事件更新每筆合併記錄資料庫。
若要存取 Application 物件事件,請在程式碼模組 的 [一 般宣告] 區段中宣告 Application 物件變數,然後將變數設定為等於您要存取事件的 Application 物件。
如需搭配 Microsoft Publisher Application 物件使用事件的相關資訊,請參閱 搭配 Application 物件使用事件。
範例
這個範例會顯示訊息,列出剛完成合併之記錄中第一個及第二個欄位的值。
Private Sub MailMergeApp_MailMergeAfterRecordMerge(ByVal Doc As Document)
With ActiveDocument.MailMerge.DataSource
MsgBox .DataFields.Item(3).Value & " " & _
.DataFields.Item(2).Value & " is finished merging."
End With
End Sub
若要發生此事件,必須將下一行程式碼放在模組的 General Declarations 區段中,並執行下列初始化程式。
Private WithEvents MailMergeApp As Application
Sub InitializeMailMergeApp()
Set MailMergeApp = Publisher.Application
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。