Discussion :

[aducrocq]

Bonjour,

Débutant sur access 2007, je dois développer une GMAO.

Mes tables sont créées, la plus part de mes formulaires en place mais j'ai deux soucis que je vais tenter de vous exposer de la façon la plus claire possible:

Chaques pièces mises en stock doivent se voir attribuer un code magasin.

Ce code est constitué de 3 éléments:
1/ l'abréviation en 4 lettres de la famille de cette pièce (pour une pièce électrique: ELEC)
2/ le code correspondant à sa sous-famille (pour un bouton 01)
3/ le numéro de sa boîte (01 par exemple)

On a donc un code unique par pièce du type ELEC0101.

Sur le papier c'est jolie mais voilà, afin de créer ce code j'utilise actuellement 3 tables (Famille, Sous-famille et Pièce de rechange), deux requêtes de mise à jour et 3 formulaires:

Mon premier formulaire permet d'ajouter une famille et son abréviation à la table Famille (tout va bien)

Le second permet de créer une Sous-famille rattachée à une Famille via une liste de choix et par la même occasion, je créé la première partie du code grâce à une requête de mise à jour: Abréviation + code sous famille (ELEC01). Là j'ai un premier soucis, afin de lancer cette requête, j'utilise une Macro activée lorsque je perd ou reçois un focus sur mes champs... mais le code ne se met pas à jour. Cependant, lorsque je viens naviguer ente mes champs dans mon formulaire (en double affichage) le code se met à jour normalement.
J'ai donc un champs qui fonctionne mais pas comme je le souhaite... Une idée?

Le troisième formulaire permet de créer la pièce elle même, avec ses informations propres ainsi que son numéro de boîte et sa sous famille. Afin d'éviter d'afficher toutes les sous familles (36 actuellement), je viens indiquer la famille, et la liste sous famille quand à elle est issue d'une requête qui vient comparer la valeur famille du formulaire à celle de la table Sous-Famille. L'ennuis est que, formulaire ouvert et famille selectionnée, access me demande de rentrer le paramètre de la famille... (Remarque: une fois rentrée, la liste est bonne).
Je pense qu'access ne reconnait pas le nom, cependant, après de nombreuses vérifications, il est bon... Une nouvelle idée??

De plus, mon premier problème se répète ici car pour la création du code final, je dois utiliser la première partie du code faite précedement et y ajouter le numéro de la boîte (ELEC0101)
Mais cette fois-ci, même en navigant dans la table, je n'obtiens rien...

Je suis désolé pour la longueure du post, comme je l'ai dit plus tôt je suis débutant et auto-didacte... Je cherche à droite à gauche des solutions mais je ne suis pas sûr de ma démarche...

J'espère que mon explication est assez claire.

Si les problèmes doivent être dissociés je ferais une nouvelle discussion.

Merci

[Lilou51]

Bonjour,

Je ne suis pas sûre de répondre correctement à vos problématiques... mais comme je passais par là...

Pour le champ qui ne se met pas à jour, il faudrait mettre quelque part me.monchamp.requery.

Pour la liste qui ne se met pas à jour, j'ai une appli où :
après modification d'un champ "ChampModifie" (==> champ1 dans TableXXX), une liste "MaListe" (==> champ2 dans TableXXX) doit se mettre à jour.
Sur l'événement lostFocus du contrôle modifié, j'ai mis ce code
me.MaListe.rowSource = "SELECT TABLEXXX.Champ2 FROM TABLEXXX WHERE TABLEXXX.Champ1=ChampModifie ORDER BY [Champ2];"

J'espère que cela fonctionnera pour vous.

Cordialement

[aducrocq]

Merci de votre réponse.

Pour être sincère, je n'ai rien codé en vba pour le moment, j'ai tout fait via l'interface access...
"me.monchamp.requery" devrait être rentré lorsque je reçois le focus sur le champs sous famille par exemple?

par contre, me.MaListe.rowSource = "SELECT TABLEXXX.Champ2 FROM TABLEXXX WHERE TABLEXXX.Champ1=ChampModifie ORDER BY [Champ2];" ne me parait pas claire, êtes vous sûre que celà permet de faire un tri? ce que je veux éviter c'est que lorsque l'on choisit la famille Electrique, il ne me propose pas un vérin pneumatique... dans la mesure où ma table Sous-famille à l'info "telle famille regroupe telle Sous-familles", c'est cette info que je veux afficher...

Ce que j'ai déjà fait:

Dans le contenu de ma liste sous-famille:
SELECT R_Sous_famille.CM_sous_famille, R_Sous_famille.Nom_Sous_famille FROM R_Sous_famille ORDER BY R_Sous_famille.[Nom_Sous_Famille];

Sachant que ma requête se présente de la façon suivante:



[Formulaires]![F_Piece rechange]![Nom_famille]

Et que mon problème est celui-ci:



Merci

[ClaudeLELOUP]

Bonjour aducrocq,

Si je résume, tu dois construire un code en combinant 3 notions :
la famille
la sous-famille
un N° de casier
et sans doute vérifier qu’une fois créé, ce code est unique.

Je suppose que cela se passe dans un formulaire d’encodage des objets qui rentrent dans l’inventaire.

Si c’est ça, peux-tu poster une BdD compatible Access2000 avec tes tables et le formulaire, cela nous permettra d’être plus concrets dans les échanges.

[Lilou51]

Pour être sincère, je n'ai rien codé en vba pour le moment, j'ai tout fait via l'interface access...

Quant à moi, je n'utilise pas l'interface Access.. donc je continue avec mes explications en VBA.... mais sans doute existe t il une façon de faire requery sur le champ via l'interface... ?

"me.monchamp.requery" devrait être rentré lorsque je reçois le focus sur le champs sous famille par exemple?

oui, c'est exact... à tester...

Dans le code, au moment de la perte de focus de Nom_famille, j'imagine que cela donnerait :
Me.Sous_Famille.rowSource = "SELECT R_Sous_famille.CM_sous_famille, R_Sous_famille.Nom_Sous_famille WHERE R_Sous_famille.Nom_Sous_famille=Nom_famille FROM R_Sous_famille ORDER BY R_Sous_famille.[Nom_Sous_Famille];"

[aducrocq]

Lilou, merci de ta réponse, Access m'a donné le même code que toi, on a donc la même "solution" mais il me demande de rentrer le paramètre Nom_famille...

Claude, merci à toi aussi pour ton aide, et tu vois juste.

GMAO1.zip

Voilà ma BdD en compatible 2000.
Le dit fomulaire se trouve dans l'onglet Administrateur : "Ajouter/Modifier Pièce de Rechange"
Ou le formulaire "F_Piece rechange"

Ca risque de vous paraître un peu fouilli car je ne pense pas avoir la rigueur de programmation d'un professionnel...