Autoriser l'ajout et empecher les doublons ds la base

Signaler
Messages postés
3
Date d'inscription
dimanche 11 décembre 2016
Statut
Membre
Dernière intervention
16 décembre 2016
-
vb95
Messages postés
2067
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
16 février 2020
-
Bonjour, voici mon code qui ne repond pas a mon souci
Private Sub Commande7_Click()
confirme = MsgBox("Confirmez-vous les modifications?", vbYesNoCancel)
Select Case confirme
Case vbYes: DoCmd.GoToRecord , , acNewRec
Case vbNo: Me.Undo
DoCmd.Close
DoCmd.OpenForm "EMPLOYERS"
Case vbCancel:
End Select

End Sub

1 réponse

Messages postés
2067
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
16 février 2020
85
Bonsoir
Avec si peu d'éléments ne t'attends pas à avoir une réponse