MailMergeDataSource.HeaderSourceType (Word)

Devuelve un valor que indica la forma en que se proporciona el origen del encabezado para la operación de combinación de correspondencia. Posibles valores de retorno son wdMergeInfoFromAccessDDE - De Microsoft Access usando DDE (Intercambio dinámico de datos), wdMergeInfoFromExcelDDE - De Microsoft Excel usando DDE, wdMergeInfoFromMSQueryDDE - De MSQuery usando DDE, wdMergeInfoFromODBC - De una conexión ODBC (conectividad abierta de bases de datos), wdMergeInfoFromODSO - De un objeto ODSO (objeto de origen de datos de Office), wdMergeInfoFromWord - De Microsoft Word, wdNoMergeInfo - No se especifica información de combinación.

Dim mmdsTemp As MailMergeDataSource 
 
Set mmdsTemp = ActiveDocument.MailMerge.DataSource 
 
If mmdsTemp.HeaderSourceType = wdMergeInfoFromWord Then 
 Documents.Open FileName:=mmdsTemp.HeaderSourceName 
End If