I am working with delete macro in a subform. It works well in deleteing  the
information but if I decide not to follow through and hit cancel a window
show us stating action failed and in order to close window I have to hit the
halt button. What must i change in the macro for it to close with out taking
any action and not showing the halt window.
Private Sub Qtdel_Click()
On Error GoTo Err_Qtdel_Click

   Dim stDocName As String

   stDocName = "QtDelete"
   DoCmd.RunMacro stDocName

Exit_Qtdel_Click:
   Exit Sub

Err_Qtdel_Click:
       Resume Exit_Qtdel_Click