tvn_hut > 18-02-16, 11:40 AM
Private Sub Command97_Click()
On Error GoTo Err_Command97_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Command97_Click:
Exit Sub
Err_Command97_Click:
MsgBox Err.Description
Resume Exit_Command97_Click
End Sub