Access 2010 - vba中的OpenReport仅打印。
我有一个简单的模态表单,用户选择日期范围并打开报表。如果查询结果为0,则会弹出一条消息,指出没有值,否则报表将打开,模式窗体将关闭。但是,每次我运行它时都不会在报表视图中打开它只会打印。我可以将其更改为设计和打印预览,所有这些都无法查看。
我一直试图弄清楚这一点,但没有用,它让我疯狂。我错过了什么?
Private Sub Command5_Click()
If DCount("*", "qryalltime_filtered") = 0 Then
MsgBox "No records to display based on the date parameter provided"
Else: DoCmd.OpenReport "rptAllTime", acViewReport
DoCmd.Close acForm, "frmAdmin-Employee"
End If
End Sub
答案 0 :(得分:0)
如果您想预览:
DoCmd.OpenReport "rptAllTime", acViewPreview
答案 1 :(得分:0)
我只想在报告视图中看到它而不是预览。我再次写了这行(就像今天第五次重新启动我的机器后),我得到了这个工作:
DoCmd.OpenReport "RptAllTime", acViewReport
我不知道为什么它在尝试了这么多次后才起作用。呃,微软......