S
Supe
I have a form that lists the employee information by using a drop down on the
Employee Name. I created a Delete Button from the wizard to delete whatever
name is selected from the drop down. When I hit the delete button, it does
not delete data. Code for delete button is below.
Private Sub cmdDelete_Click()
On Error GoTo Err_cmdDelete_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_cmdDelete_Click:
Exit Sub
Err_cmdDelete_Click:
MsgBox Err.Description
Resume Exit_cmdDelete_Click
End Sub
Why is this not working?
Employee Name. I created a Delete Button from the wizard to delete whatever
name is selected from the drop down. When I hit the delete button, it does
not delete data. Code for delete button is below.
Private Sub cmdDelete_Click()
On Error GoTo Err_cmdDelete_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_cmdDelete_Click:
Exit Sub
Err_cmdDelete_Click:
MsgBox Err.Description
Resume Exit_cmdDelete_Click
End Sub
Why is this not working?