E
Eamon Straughn
this code below is right to my knowledge to open up the report and show the
data for the mailing list. however, i would like to expand this further by
taking the details from the report and then publish it into word by the
click of the button.
this the code i am using to open up the report and show the data. can
someone please help me expand it to my desired result.
Private Sub cmdGo_Click()
Dim stDocName As String
Dim qry As DAO.QueryDef
Dim cy As Page
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Call SetGlobal("ReportMailingID", "", Me.ID)
stDocName = "rMailing1"
DoCmd.OpenReport stDocName, acPreview
DoCmd.RunCommand acCmdCompleteWord
End Sub
data for the mailing list. however, i would like to expand this further by
taking the details from the report and then publish it into word by the
click of the button.
this the code i am using to open up the report and show the data. can
someone please help me expand it to my desired result.
Private Sub cmdGo_Click()
Dim stDocName As String
Dim qry As DAO.QueryDef
Dim cy As Page
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Call SetGlobal("ReportMailingID", "", Me.ID)
stDocName = "rMailing1"
DoCmd.OpenReport stDocName, acPreview
DoCmd.RunCommand acCmdCompleteWord
End Sub