0

当我运行以下代码时，我收到错误“需要对象”。我希望能够单击一个按钮，它将保存此文件以及报告上的一个数字字段，称为Market_ID，然后报告的名称是 Market Rate Notification Final。报告确实显示了，但我没有得到保存对话框。此外，如果我从中删除 Report![Market Rate Notification Final].Market_ID +，strReportName我会看到一个保存对话框，其中包含名为 Market Rate Notification Final.pdf 的文件。

Option Compare Database

'------------------------------------------------------------
' Export_MLR
'
'------------------------------------------------------------
Function Export_MLR()
On Error GoTo Export_MLR_Err
    Dim strReportName As String

    strReportName = Report![Market Rate Notification Final].Market_ID + "Market Rate Notification Final"
    DoCmd.OutputTo acOutputReport, strReportName, "PDFFormat(*.pdf)", "", False, "", , acExportQualityScreen


Export_MLR_Exit:
    Exit Function

Export_MLR_Err:
    MsgBox Error$
    Resume Export_MLR_Exit

End Function
4

1 回答 1

1

您不能像这样引用报表控件的内容：

strReportName = _
   Report![Market Rate Notification Final].Market_ID + "Market Rate Notification Final"

各种错误的结果是 strReportName 为 Null。首先是Reports，不是Report，接下来，你不能通过这种方式从报表中获取一个控件的值，你会得到报表最后一行的值，并且连接符是&不是+，除非你是做一些很花哨的事情。

于 2012-04-24T15:48:11.113 回答