Private Sub Form_Close() DoCmd.Close acReport, "rptOtpremnica" End Sub