Discussion :

[europe2508]

Bonjour a tous. Je viens vous voir pour un problème recurant mais la y'a quelque chose qui m'echappe
VOici le probleme :
J'ai un formulaire composé d'une table nommé " principal" avec des champs ( jusqu'ici tous va bien). Dans cette table il y a un champ poid qui est vide.

Dans ce formulaire il y a un sous formulaire avec une autre table nommé annexe dont un champ poid qui et toujour renseigner.
Les deux table sont lié par un champ unique. Donc pour le sous formulaire il n'y a qu'un choix a chaque fois.

Je voudrai donc enregistrer dans la table principal dans le champs poid la valeur du sous formulaire du champ poid de la table annexe.
en gros que principal.poid = annexe.poid

J'ai fait quelque petite recherche et sa doit normalement me donner ceci :

champ=forms![principal]![annexe].form![poid]

Or je ne sais ou placer ce bout de code pour que ceci marche.
Je ne suis pas non plus expert VBA.
je vous remercie par avance si vous pouvez m'eclaircir.
Est ce qu'il et possible de faire ceci aussi par une macro ?

[Heureux-oli]

Bonjour et bienvenue sur les forum Office de DVP.
Pas la bonne formule.

Sur le clic d'un bouton exécuter le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Sub MonBouton_Clic()
Me.Poids = Forms!MonSousForumulaire!Poids
End Sub

Forms : parce qu'on fait appel à la collection des formulaires de l'application Access.
MonsSousFormulaire : Le nom de mon sous formulaire
Poids : le contrôle qui contient la valeur que je veux copier dans
mon formulaire principal.
Me.Poids : Me fait référence au formulaire Actif et à son contrôle Poids.

[europe2508]

merci mais je met ou se code ??
dans un generateur d'expression ?
dans le champ poid du formulaire ou du sous formulaire ?

[Heureux-oli]

Il faut faire un bouton sur ton formulaire principal et mettre ce code derrière ton bouton. Générateur de code et pas d'expression.

Petite question ?

La relation entre tes tables est-elle de 1 à 1.
Si c'est le cas, ce sera beaucoup lus rapide avec une requête mise à jour.
Tous tes enregistrements seront mis à jour en une seule fois.

[europe2508]

Peut on eviter de faire un bouton. sela ne peu pas se faire automatiquement ?
Que veut tu dire pour la relation 1-1 ?
il y a une liasion c'est tout ce que j'ai fait entre id et id

[Heureux-oli]

Automatiquement, ce sera par du code quand même.
Les valeur par défaut que le générateur d'expression génère ne sont utiles que pour les nouveaux enregistrements, pour les enregistrement existant, il faut passer par du code ou faire tourner une requête.

[europe2508]

Daccord alors ..... je qu'est ce que je fait au final ?
COmment faire cela par du code pour que tout soit automatique ?

[Renardo]

Si tu as des champs a remplir tu peux mettre le code sur la mise a jour de l'un d'eux

[europe2508]

Nan sa ne va pas ou alors je ne comprend rien
La je commence serieusement à déprimer !!!!!!!!!

Je veut que le poid du sous formulaire afficher aille dans une zone de text du formulaire et que celui ci sauvegarde automatiquement dans le champs de la table correspondante au formulaire, sans faire de bouton. que cela soit automatique.

Soit avec une macro soit par du code vba mais alors la faudra m'expliquer un peu plus
Si quelqu'un a une solution comme cela je serai quelqu'un de tres heureux
merci d'avance

personne pour m'aider ???

[Jeannot45]

Hello,

Pour recupérer la valeur de ton Poids dans le sous formulaire et le stocker dans le champ Poids du formulaire : évènement Sur Activation du Formulaire Principal

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Form_Current()
        Me.Poids = Form_Sf_Materiel.Controls("Poids")
End Sub

A+

Jeannot