Discussion :

[locweb]

Bonjour,
j'ai créé une liste déroulante avec 2 colonnes de données, et j'aimerais que les données de chaque ligne aillent pour le 1ere colonne dans un champ A, et les données de la 2eme colonne aillent dans un champ B; Or access ne permet d'envoyer les données que d'une colonne vers un champ. Y a t'il une solution ?
Exemple:
Col A -> Champ Observation Col B -> Champ Score
Tombe en AR -4
Se penche en AV 0
S'aide des mains -2

Cela me servirait à présenter les observations d'un côté, et le score global de l'autre avec un champ calculé.
Merci;
NB je connais access assez bien, mais pas le VBA, j'ai besoin d'explications très simples, pour un nèophyte.

[LedZeppII]

Bonjour,

un exemple de code vba

Code vba :

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

1
2
3
4
5
6
Private Sub MaListe_AfterUpdate()
If Me.MaListe.ListIndex <> -1 Then
   Me.Observation = Me.MaListe.Column(0)  ' 1ère colonne
   Me.Score = Me.MaListe.Column(1)  ' 2ème colonne
End If
End Sub

Nom des contrôles utilisés (Fenêtre Propriétés->Onglet Autres->Nom) :
MaListe est le nom de la liste déroulate
Observation est le nom du contrôle dont le champ lié est Observation
Score est le nom du contrôle dont le champ lié est Score

Le code ci-dessus correscpont au code de l'évènement "Après MAJ" de la liste MaListe.
Dans la fenêtre Propriétés de la liste MaListe aller dans l'onglet Evènements.
En face de "Après MAJ" choisir "Procédure évènementielle", cliquer sur le bouton avec trois petits points.
Dans l'éditeur VB copier les lignes comprises entre Private Sub MaListe_AfterUpdate() et End Sub.
Remplacer les noms des contrôles par ceux de ton formulaire.

A+

[locweb]

Merci, j'ai pu utiliser votre code, et cela marche.