[Access] Saisie formulaire sans risk doublons

Fermé
Gorion87
Messages postés
55
Date d'inscription
vendredi 20 février 2009
Statut
Membre
Dernière intervention
28 février 2011
- 30 mars 2009 à 15:39
Bonjour à tous,

Je suis entrain de créer une base de données Access et jusque là j'arrivais à me débrouiller tout seul mais j'ai un blocage sur les doublons.

Au moment de la saisie dans le formulaire "Weekly Report", je voudrais qu'au moment de l'enregistrement ou du clic sur le bouton "Retour Menu général" ou "Saisie d'un nouveau Weekly Report" qu'il n'y ait pas de données "Code" et "Semaine" en doublons sur la meme ligne dans la table "Weekly point" et qu'un MsgBox s'affiche pour spécifier qu'il faut modifier la saisie.

Je vous joins une copie de la base :

https://www.cjoint.com/?ebpMVASd3B

J'ai mis en place une double clé primaire sur ces deux champs dans la table, mais je prefererai un code avec le bouton.

Je vous joins également une macro que j'ai trouvé sur un forum mais que je n'arrive pas à adapter à mon cas :

dim req as string
dim rs as recordset
dim mabase as database
set mabase = currentdb()
req="select Code, Semaine from personne where nompersonne='" & me.nom & "' and prenom_personne='" & me.prenom &"'"
set rs=mabase.openrecordset(req)
if rs.eof then
req="insert into personne (nompersonne, prenom_personne) values('" & me.nompersonne & "','" & me.prenom_personne & "')"
docmd.runsql(req)
then
msgbox ("la personne existe déjà dans la base impossible de l 'ajouter")
end if


Merci pour votre aide.