Access VBA
Utilisateur anonyme
-
blux Messages postés 27120 Date d'inscription Statut Modérateur Dernière intervention -
blux Messages postés 27120 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
je voudrais savoir ce que fait ce "truc"..
Private Sub Bouton31_Click()
On Error GoTo Err_Bouton31_Click
DoCmd.DoMenuItem A_FORMBAR, A_EDITMENU, 10, , A_MENU_VER20
Exit_Bouton31_Click:
Exit Sub
Err_Bouton31_Click:
MsgBox Error$
Resume Exit_Bouton31_Click
End Sub
Merci d'avance..
je voudrais savoir ce que fait ce "truc"..
Private Sub Bouton31_Click()
On Error GoTo Err_Bouton31_Click
DoCmd.DoMenuItem A_FORMBAR, A_EDITMENU, 10, , A_MENU_VER20
Exit_Bouton31_Click:
Exit Sub
Err_Bouton31_Click:
MsgBox Error$
Resume Exit_Bouton31_Click
End Sub
Merci d'avance..
