打开附加至邮件合并主文档的域名源,如果已经打开,就激活该域名源。
注意 如果邮件合并主文档没有域名源,这个方法会导致出错。
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