【发布时间】:2012-04-24 23:59:08
【问题描述】:
当我运行以下代码时,我收到错误“需要对象”。我希望能够单击一个按钮,它将保存此文件以及报告上称为 Market_ID 的数字字段,然后报告的名称是 Market Rate Notification Final。报告确实显示了,但我没有得到保存对话框。另外,如果我删除
Report![Market Rate Notification Final].Market_ID + from 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
【问题讨论】:
-
将“+”替换为“&”,然后重试。还要检查
Report![Market Rate Notification Final].Market_ID是否给出并输出?