Private Sub Command93_Click()
On Error Resume Next
    DoCmd.SendObject acForm, "", "", "", "", "", "", "", True, ""
End Sub