HeaderSourceType Property Example

This example opens the header source attached to the active document if the source is a Word document.

Set dSource = ActiveDocument.MailMerge.DataSource
If dSource.HeaderSourceType = wdMergeInfoFromWord Then
    Documents.Open FileName:=dSource.HeaderSourceName
End If