1

我在 MS Access 中创建了报告，并on_click在用户桌面上创建了一个将上述报告另存为 PDF 的命令。

问题是，运行此命令后，不仅保存 PDF 版本，还打印了它。

我很困惑，我的代码的哪一部分给出了打印整个内容的命令？

Private Sub Oldsys_atask_isorei_Click()
    'file name
    ReportName = "Report_" & Format(Now, "_yyyy-mm-dd") & ".pdf"
    'path to Users desktop
    DTAddress = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "/"

    'opens report in background (without it OutputTo did not seemed to work)
    DoCmd.OpenReport "rprtOldsys_isorei", acViewNormal, , , acHidden
    'saves report in PDF on Users desktop
    DoCmd.OutputTo acOutputReport, "rprtOldsys_isorei", acFormatPDF, DTAddress & ReportName, True
    'closes opened report
    DoCmd.Close acReport, "rprtOldsys_isorei", acSaveNo
End Sub
4

1 回答 1

2

acViewNormal表示为报告打印此内容，这是默认视图。

使用acViewReport（报告视图）或acViewPreview（打印预览）不打印报告。

于 2019-05-27T07:34:02.677 回答