EditHeaderSource 方法

       

打开附加至邮件合并主文档的域名源,如果已经打开,就激活该域名源。

注意   如果邮件合并主文档没有域名源,这个方法会导致出错。

expression.EditHeaderSource

expression   必需。该表达式返回一个 MailMerge 对象。

示例

本示例向活动文档附加一个域名源,然后打开这个域名源。

With ActiveDocument.MailMerge
    .MainDocumentType = wdFormLetters
    .OpenHeaderSource Name:="C:\Documents\Header.doc"
    .EditHeaderSource
End With

如果活动文档有附加的相关域名文件,本示例就打开该域名源。

Dim mmTemp As MailMerge

Set mmTemp = ActiveDocument.MailMerge
If mmTemp.State = wdMainAndSourceAndHeader Or _
        mmTemp.State = wdMainAndHeader Then
    mmTemp.EditHeaderSource
End If