Discussion :

[SeaWolf601]

Soit j'ai loupé un truc, soit on parle de la même chose.

Dans une palette j'ai 10 colis

5 de type A
3 de type B et
2 de type C

C'est bien cela ?

Si oui, je ne vois pas le besoin d'un sous formulaire.
un formulaire continu suffit amplement.

[Trimatelo]

Ah ba on parle de la même chose alors...

Mais j'vois pas trop à quoi ça va ressembler !

Mais j'te fais confiance !

Donc, on en était ici:

Code :

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

1
2
Me.Prix = Me.Ref.column(1)
Me.Poids = Me.Poids.column(2)

Le champ Me.Poid_Total sera égal à : Me.poids * Me.Nb_Colis
Le champ Me.Prix_Total sera égal à : Me.prix *Me.Nb_Colis


Donc ça je le met dans une procédure evenementiel particulière ?

[SeaWolf601]

Tu as tout compris.

sur Me.Nb_Colis évènement afterUpdate.

Code :

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

1
2
Me.Poid_Total = Me.poids * Me.Nb_Colis
Me.Prix_Total = Me.prix * Me.Nb_Colis

[Trimatelo]

Mais, avec ce que tu m'as données à écrire, comment access fera la référence entre la table reference / poid, la table référence / prix et la table ou y'a les informations que je vais appeller table_information x) (faisont simple) ?

[SeaWolf601]

Ton champ reférence doit être une ComboBox.

La source de cette ComboBox doit être tes deux tables Ref_Poid et Ref_Prix, liées, en un pour un, par la Ref.

3 champs : Ref, (l'un ou l'autre c'est la même), Prix, et Poids.

3 Colonnes pour ta ComboBox, sur l'evenement AfterUpdate de ta combo Ref.

Code :

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

1
2
Me.Prix = Me.Ref.column(1)
Me.Poids = Me.Ref.column(2)

[Trimatelo]

Alours alours, je n'arrive pas à appliquer l'intégrité référencielle sur la référence entre table prix et poid :s

Pour tout le reste, je l'ai fait et j'ai une petite erreur de compilation ^^'

"Membre de méthode ou de données introuvable"

et il me surligne mon "Private Sub RéférenceChamp_AfterUpdate()"

Sommes nous bien d'accord que ici:

Code :

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

1
2
Me.Prix = Me.Ref.column(1)
Me.Poids = Me.Ref.column(2)

Prix et poids sont les champs de mon formulaire Information ? Ou je n'ai rien compris et je ferais mieux d'aller me pendre ?

[SeaWolf601]

Hummmmmm.... tu peux m'envoyer ta base que je jete un coup d'oeil ?