Sorry Hershey, I spent lots of days with my pc off; try to open your report in design mode, use the previous code, printout, and finally close the report.
Commands you need are:
DoCmd.OpenReport "Myreport", acViewDesign
........... (prevoius code)
DoCmd.PrintOut
DoCmd.Close acReport, "Myreport"...