[Formulaire/Vba]Impossibilité de récupérer des champs sur un menu déroulant

**Oceliane** · 07/06/2007, 16h16

Bonjour, j'ai un menu déroulant qui est rattaché à une table annexe, et qui me donne une liste de partenaires.

voici son contenu:

Code :

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

1
2
SELECT [Partenaires Bancaires].BQID, [Partenaires Bancaires].Region, [Partenaires Bancaires].PartenaireID, [Partenaires Bancaires].[Avantage 1], [Partenaires Bancaires].[Avantage 2], [Partenaires Bancaires].[Avantage 3], [Partenaires Bancaires].[Avantage 4], [Partenaires Bancaires].[Avantage 5], [Partenaires Bancaires].[Avantage 6], [Partenaires Bancaires].[Avantage 7], [Partenaires Bancaires].[Avantage 8], [Partenaires Bancaires].[Avantage 9], [Partenaires Bancaires].[Avantage 10], [Partenaires Bancaires].Plafond_com, [Partenaires Bancaires].Base_Com_Max, [Partenaires Bancaires].Fixe, [Partenaires Bancaires].Taux_Com
FROM [Partenaires Bancaires];

la colonne 1 et 2 s'affichent sur le menu, la colonne 3 est la colonne liée.

En choisissant un partenaire, on déclenche une suite d'écritures dans le formulaire:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub PartenaireID_AfterUpdate()
 
Me.Avantage_1 = Me.PartenaireID.Column(3)
Me.Avantage_2 = Me.PartenaireID.Column(4)
Me.Avantage_3 = Me.PartenaireID.Column(5)
Me.Avantage_4 = Me.PartenaireID.Column(6)
Me.Avantage_5 = Me.PartenaireID.Column(7)
Me.Avantage_6 = Me.PartenaireID.Column(8)
Me.Avantage_7 = Me.PartenaireID.Column(9)
Me.Avantage_8 = Me.PartenaireID.Column(10)
Me.Avantage_9 = Me.PartenaireID.Column(11)
Me.Avantage_10 = Me.PartenaireID.Column(12)
Me.Plafond_com = Me.PartenaireID.Column(13)
Me.Base_com = Me.PartenaireID.Column(14)
Me.Fixe = Me.PartenaireID.Column(15)
Me.Taux_com = Me.PartenaireID.Column(16)
Me.Refresh
End Sub

Les avantages sont aussi des menus déroulants, avec une liste non stricte.

le reste (Plafond_com, Base_Com, Fixe, et Taux_Com) sont des zones de texte.

toutes ces valeurs peuvent bien sur être modifiées au besoin dans le formulaire, et ceci sans modifier le contenu de la table des partenaires.

Et là, c'est le drame.

Lorsque l'on choisit un partenaire dans le menu déroulant, tous les avantages sont automatiquement mis à jour, le plafond de commission, mais le reste ne s'affiche pas. le contenu du champ de destination est écrasé, mais par du vide.

comment pallier à ce problême?