Discussion :

[MelaAllIn]

Re-bonjour,

J'ai un formulaire COMPANY_NOUVEAU qui me permet de créer un nouvel enregistrement dans une table COMPANY.
Dans cette table, j'ai ma clé primaire, un code spécifique appelé CodeCompany à saisir dans le formulaire, ainsi que d'autres infos, également à saisir dans le formulaire.
Je souhaiterais que, lorsque j'appuie sur le bouton Valider (sur lequel j'ai un évènement DoCmd.RunCommand acCmdSaveRecord) de mon formulaire, une vérification s'effectue sur tous les CodeCompany de la table COMPANY, afin de s'assurer qu'il n'y a pas de doublon. En gros, si le CodeCompany existe déjà, j'ai une Msgbox qui m"informe que le codeCompany XXX existe déjà, sinon, il ne se passe rien.
Je n'y connait pas grand chose en VBA, donc je ne sais pas du tout comment m'y prendre...
D'avance merci pour votre aide.

MelaAllIn

[rjamin]

Bonjour,
Si Code_Company est déclaré en clé primaire pas de problème de doublon possible.
Dès que vous avez tapez un nouveau code et valider par Enter vous faites F9 pour actualiser et si c'est un doublon un message vous le signale, sinon le même message apparaîtra au passage à l'enregistrement suivant.

[MelaAllIn]

Merci pour votre réponse. Le Code Company n'est pas la clé primaire (ça peut être une valeur nulle)... C'est bien là mon problème.
En plus, j'aimerais que le système fonctionne en "automatique", et ne pas avoir à appuyer sur une touche (comme F9), car les utilisateurs qui ne connaissent pas ne sauront pas faire.
D'autres pistes ?
Encore merci !
MelaAllIn

[rjamin]

Re,

Dans les propriétés du champ sur la ligne 'Indexé' choisre Oui - Sans doublons.

Mais si vous voulez que ce champ une clé primaire on peut mettre la propriété Null autorisé à Oui tout comme châine vide d'ailleurs

[MelaAllIn]

Merci RJamin, ça marche !
Je vais avoir du ménage à faire, car je dois déjà avoir des CodeCompany en doublon sur mes 300 lignes d'enregistrements.... J'aurais dû y penser dès le début !

Par contre, j'ai une question subsidiaire :
Lorsque je créé une nouvelle Company avec un CodeCompany qui existe déjà, j'ai le le message suivant :
"The changes you requested to the table were not successful because they would create duplicate values in the index, primary key, or relationship. Change the data in the fieldor fields that contain duplicate data, remove the index, or redefine the index to permit duplicate entries and try again".
Comment faire pour avoir à la place un message personnalisé du type "Le CodeCompany que vous avez sais existe déjà, veuillez le changer" ???

Merci pour votre aide.

MelaAllIN

[rjamin]

Re,

Je vois qu'une solution c'est par VBA, dès que le champ Code_Company perd le focus c'est de lancer une procédure pour contrôler que le Code entré n'existe pas encore et faire afficher un message d'avertissement si ce code existe déjà.
Dans ces conditions le message d'Access n'apparaîtra pas puisque vous aurez corrigé avant.
Mais la procédure il faut la programmer. Chercher un peu dans la FAQ il est très probable que vous y trouverez des idées.