如果选中,我如何打开一个复选框打印一个报告,如果未选中则如何打印另一个报告?

时间:2015-03-06 16:01:37

标签: ms-access checkbox report

我正在使用Access来打印员工报告,我已经构建了一个搜索表单来促进这一点并查询这些报告。我有详细报告和摘要报告,我想要这样做,因此我只有一个按钮用于打开报告,预览报告和打印报告按钮,而不是一组用于详细信息,一组用于摘要。这里有几张图片来说明我的需求。

enter image description here

这就是我目前所拥有的。

enter image description here

这就是我想要的。

如果选中,则如何配置复选框以打开/预览/打印详细信息(如果未选中)和摘要?另外,如果可能的话,我更愿意不使用VBA代码 - 因为管理员不熟悉代码,更不用说Access将来必须使用它。

任何帮助都会非常感激!!!!!

1 个答案:

答案 0 :(得分:1)

您必须在按钮的OnClick事件中使用VBA:

Dim ReportName As String

If Me!CheckSummary.Value = True Then
    ReportName = "NameOfNormalReport"
Else
    ReportName = "NameOfSummaryReport"
End If
DoCmd.OpenReport ReportName