Création d'un code produit avec clé calculée
MajorTom67
Messages postés
4
Statut
Membre
-
MajorTom67 Messages postés 4 Statut Membre -
MajorTom67 Messages postés 4 Statut Membre -
Bonjour,
Je cherche à créer des références à 6 chiffres pour des produits d'une BD sous Access.
Les 5 premiers chiffres sont incrémentiels et débutent à 11111. J'aimerai que le 6eme chiffre soit une clé qui se calcule en fonction des 5 premiers afin d'éviter toute erreur de saisie.
J'ai cherché des algorithmes sur le web mais je n'ai rien trouvé de simple qui peut se faire par un ou plusieurs champs calculés sur Access.
Quelqu'un peut m'aider SVP ?
Je cherche à créer des références à 6 chiffres pour des produits d'une BD sous Access.
Les 5 premiers chiffres sont incrémentiels et débutent à 11111. J'aimerai que le 6eme chiffre soit une clé qui se calcule en fonction des 5 premiers afin d'éviter toute erreur de saisie.
J'ai cherché des algorithmes sur le web mais je n'ai rien trouvé de simple qui peut se faire par un ou plusieurs champs calculés sur Access.
Quelqu'un peut m'aider SVP ?
4 réponses
-
-
Je ne sais pas, c'est à ton imagination de jouer !
Pour simplifier, tu pourrais mettre la clé sur 2 chiffres (au lieu de 1), et tu pourrais vérifier que le si la sommes des 5 premiers = clé, c'est OK.
Autre exemple, multiplier chiffre 1 x chiffre 2 et diviser le résultat par (chiffre 3 + chiffre 4 + chiffre 5), et que la décimale du résultat soit égale au 6ème...
Il y a une infinité. A toi de décider !
A+
-
Bonjour,
Si la fonction Mid() n'existe plus en standard avec A2016, il est sans doute possible de la récupérer dans les références du VBA.
Ouvrir le VBA, Ouvrir l'onglet Outils puis référence. Après chercher dans références affichées non cochées celle qui pourrait contenir la fonction Mid().
Sinon, tu peux envisager d'utiliser la fonction Left(A,1) si tes index sont toujours de même longueurs.
Sinon, il serait peut-être plus simple de mettre la clé dans un champ calculé à côté, avec ton algorithme
Sinon, à vérifier s'il n'existe pas une fonction équivalente en Excel, et voir comment elle s'écrit en VBA-Excel, et alors sélectionner dans les références comme indiqué ci-dessus.
Bonne suite; -
Merci pour vos suggestions. Je vais essayer cela cette semaine. Bonne journée !