Returns an OfficeDataSourceObject object representing the mail merge data source in a mail merge operation. Read-only.
expression.OfficeDataSourceObject
expression Required. An expression that returns one of the objects in the Applies To list.
The following example displays information about the current mail merge data source.
Dim odsoTemp As Office.OfficeDataSourceObject
Set odsoTemp = Application.OfficeDataSourceObject
With odsoTemp
Debug.Print "Connection string: " & .ConnectString
Debug.Print "Data source: " & .DataSource
Debug.Print "Table: " & .Table
End With