Question

我有任何报告使用的报告，产量为零记录。报告标题告诉什么过程没有记录。

strNoRecordOpenArg是Global Veriable

主要表格代码**

strNoRecordOpenArg = "Imported AEL's"
DoCmd.OutputTo acOutputReport, "rpt_universal_no_records", acFormatPDF, "C:\Reports\Imported AEL's.pdf"
strNoRecordOpenArg = ""

报告代码**

Private Sub Report_Open(Cancel As Integer)
.txt_header_title.ControlSource = "=""" & strNoRecordOpenArg & """"
End Sub

如果流程完成且没有生成报告，则会发生什么。

如果我删除报告代码，它可以工作，但报告标题是#Name。

我使用立即窗口并且strNoRecordOpenArg的值保持不变，并且应该可用于打开报告过程。

所有这一切都是为了完全自动化这个过程。如果我使用

DoCmd.OpenReport "rpt_universal_no_records", , "", "", acWindowNormal, "Imported AELs"

并使用openarg提供报告标题，一切正常，但系统会提示您将文件保存为。

任何想法？

坦克你！

Answer 1

表格

Dim i As Integer
i = DCount("*", "a_import_aels_step_1")
    If i = 0 Then
        strNoRecordOpenArg = "Imported AEL's"
        DoCmd.OutputTo acOutputReport, "rpt_universal_no_records", acFormatPDF, "F:\Desktop\Imported AEL's.pdf"
        Exit Sub

报告

Me.txt_header_title.Caption = "" & strNoRecordOpenArg & ""

DoCmd.OutputTo acOutputReport和OpenArgs解决方法

1 个答案: