Ms access 访问运行时宏在'；退出'；

当我运行宏时，它在“DoCmd.Quit acQuitSaveNone”上停止 上面写着“退出现在不可用” 我需要做什么来更正此问题

Public Function UnassignedPayments()
    Dim XFile As String

NPDateB = Date
        NPDateE = Date

        DoCmd.SetWarnings False

        XFile = "I:\Management Reports\Unassigned Payment Analysis Report.pdf"

        DoCmd.OutputTo acOutputReport, "Unassigned Payment Analysis Report", acFormatPDF, XFile
            DoCmd.Quit acQuitSaveNone
End Function

---

使用

Application.Quit acQuitSaveNone

，它不应导致此错误