MailMergeDataSource.Type (Word)
Returns the type of mail merge data source. Possible return values are wdMergeInfoFromAccessDDE - From Microsoft Access using Dynamic Data Exchange (DDE), wdMergeInfoFromExcelDDE - From Microsoft Excel using DDE, wdMergeInfoFromMSQueryDDE - From MSQuery using DDE, wdMergeInfoFromODBC - From an Open Database Connectivity (ODBC) connection, wdMergeInfoFromODSO - From an Office Data Source Object (ODSO), wdMergeInfoFromWord - From Microsoft Word, wdNoMergeInfo - No merge information provided.
Dim wmmType As WdMailMergeDataSource
wmmType = ActiveDocument.MailMerge.DataSource.Type