我正在选择一些记录,我可以选择将它们视为报告(按下Command33按钮)
Private Sub Command33_Click()
DoCmd.OpenReport "repAwariaOtwarta", acViewPreview, , "[dbAwarieOtwarte].[ID] =" & Me![ID]
End Sub
点击按钮后,我弹出了报告。 单击Command33后我应该怎么做才能打印该报告而不会覆盖它?
我试图使用DoCmd.PrintOut,但我似乎失败了。
答案 0 :(得分:2)
结合您的想法: 打开报告,使用print命令。
Private Sub Command33_Click()
DoCmd.OpenReport "repAwariaOtwarta", acViewPreview, , _
"[dbAwarieOtwarte].[ID] =" & Me![ID]
DoCmd.PrintOut , , , , 1
End Sub
以下是Printout命令的参数
https://msdn.microsoft.com/en-us/library/office/ff192667.aspx
如果需要,可以在打印命令之后为报告执行close方法,如
DoCmd.Close acReport, "repAwariaOtwarta"