Here is the code that I used to use a query as the datasource for a mail merge document.
DoCmd.OpenQuery "qryProspectMerge", acViewNormal
intAnswer = MsgBox("Is this the correct information?", vbYesNo, "Confirm Results of Query")
If intAnswer = vbYes Then
DoCmd.Close...