Bonjour,
J'ai une base de donn=E9es Cave =E0 vin.
Dans un formulaire se trouve un champ des diff=E9rents crus=20
et un champ indiquant le nombre de bouteilles=20
correspondant au cru s=E9lectionn=E9.
Plut=F4t que de devoir cliquer sur les fl=E8ches avant et=20
arri=E8re du bas du formulaire afin d'arriver au cru choisi=20
et avoir ainsi le nombre de bouteilles correspondant,je=20
pr=E9f=E8rerai avoir une liste d=E9roulante des crus et, en=20
cliquant sur l'un d'eux, obtenir directement le nombre de=20
bouteilles correspondant.
J'ai cr=E9=E9 la liste d=E9roulante mais je ne connais pas le=20
code VBA =E0 =E9crire pour obtenir le nombre de bouteilles.
Merci =E0 tous.
JB.
.
Sub lstChoix.AfterUpdate txtNbBouteille.Requery End Sub
Il reste quelques fignolages à faire, comme remplacer les noms par ceux de la base, ajouter les guillemets autour de la clef si elle est de type caractère.
Si jamais ça s'avère nécessaire, dans Form.Current, ajouter Me.Repaint et DoEvents.
-----Message d'origine----- Bonjour, J'ai une base de données Cave à vin. Dans un formulaire se trouve un champ des différents crus et un champ indiquant le nombre de bouteilles correspondant au cru sélectionné. Plutôt que de devoir cliquer sur les flèches avant et arrière du bas du formulaire afin d'arriver au cru choisi et avoir ainsi le nombre de bouteilles correspondant,je préfèrerai avoir une liste déroulante des crus et, en cliquant sur l'un d'eux, obtenir directement le nombre de bouteilles correspondant. J'ai créé la liste déroulante mais je ne connais pas le code VBA à écrire pour obtenir le nombre de bouteilles. Merci à tous. JB. ..
.
Bonjour JB,
Cette question serait plus à sa place dans
microsoft.public.fr.access
Sub lstChoix.AfterUpdate
txtNbBouteille.Requery
End Sub
Il reste quelques fignolages à faire, comme remplacer les
noms par ceux de la base, ajouter les guillemets autour de
la clef si elle est de type caractère.
Si jamais ça s'avère nécessaire, dans Form.Current,
ajouter Me.Repaint et DoEvents.
-----Message d'origine-----
Bonjour,
J'ai une base de données Cave à vin.
Dans un formulaire se trouve un champ des différents crus
et un champ indiquant le nombre de bouteilles
correspondant au cru sélectionné.
Plutôt que de devoir cliquer sur les flèches avant et
arrière du bas du formulaire afin d'arriver au cru choisi
et avoir ainsi le nombre de bouteilles correspondant,je
préfèrerai avoir une liste déroulante des crus et, en
cliquant sur l'un d'eux, obtenir directement le nombre de
bouteilles correspondant.
J'ai créé la liste déroulante mais je ne connais pas le
code VBA à écrire pour obtenir le nombre de bouteilles.
Merci à tous.
JB.
..
Sub lstChoix.AfterUpdate txtNbBouteille.Requery End Sub
Il reste quelques fignolages à faire, comme remplacer les noms par ceux de la base, ajouter les guillemets autour de la clef si elle est de type caractère.
Si jamais ça s'avère nécessaire, dans Form.Current, ajouter Me.Repaint et DoEvents.
-----Message d'origine----- Bonjour, J'ai une base de données Cave à vin. Dans un formulaire se trouve un champ des différents crus et un champ indiquant le nombre de bouteilles correspondant au cru sélectionné. Plutôt que de devoir cliquer sur les flèches avant et arrière du bas du formulaire afin d'arriver au cru choisi et avoir ainsi le nombre de bouteilles correspondant,je préfèrerai avoir une liste déroulante des crus et, en cliquant sur l'un d'eux, obtenir directement le nombre de bouteilles correspondant. J'ai créé la liste déroulante mais je ne connais pas le code VBA à écrire pour obtenir le nombre de bouteilles. Merci à tous. JB. ..
