OVH Cloud OVH Cloud

[A2003] Selection alpha dans zone de liste

1 réponse
Avatar
Laurent BERNASCONI
Bonjour à tous,

Voici le problème sur lequel je butte depuis quelques temps :

J'ai un formulaire nommé 'frmObservations' dans lequel se trouve une zone de
liste nommé 'lstObservations'. Sous cette zone de liste j'ai un groupe
d'option nommé 'optObservations' dans lequel se trouve 26 boutons de
commande qui reprennent les 26 lettres de notre alphabet.
La source de ma zone de liste est la suivante 'SELECT DISTINCT
Observations.Code_Obs, Observations.Libelle_Obs FROM Observations ORDER BY
[Libelle_Obs];' et la colonne visible dans la liste est celle qui contient
les libellés (Observations.Lebelle_Obs).
Question :
Comment faire en VBA, pour que lorsque l'utilisateur appuie sur le bouton
'C', ce soit le premier élément de la zone de liste commencant par 'C' qui
se sélectionne automatiquement.
Je m'arrache les cheveux depuis 2 jours sur ce problème certainement très
simple à résoudre...
Merci pour votre aide et bonne journée.
Laurent

1 réponse

Avatar
Raymond [mvp]
bonjour.

il n'est pas utile de mettre tous ces boutons, il faut placer une liste
modifiable ( pas zone de liste) avec la même source et mettre l'option auto
étendre à oui (normalement option par défaut à oui).
chaque composition de caractère affichera la 1ere donnée correspondante. Tu
peux aussi, pour ouvrir automatiquement la liste à l'entrée, faire:
Private Sub Modifiable1_GotFocus()
Me.Modifiable1.Dropdown
End Sub


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Laurent BERNASCONI" a écrit dans le message de
news:40c03df0$0$307$
Bonjour à tous,

Voici le problème sur lequel je butte depuis quelques temps :

J'ai un formulaire nommé 'frmObservations' dans lequel se trouve une zone
de

liste nommé 'lstObservations'. Sous cette zone de liste j'ai un groupe
d'option nommé 'optObservations' dans lequel se trouve 26 boutons de
commande qui reprennent les 26 lettres de notre alphabet.
La source de ma zone de liste est la suivante 'SELECT DISTINCT
Observations.Code_Obs, Observations.Libelle_Obs FROM Observations ORDER BY
[Libelle_Obs];' et la colonne visible dans la liste est celle qui contient
les libellés (Observations.Lebelle_Obs).
Question :
Comment faire en VBA, pour que lorsque l'utilisateur appuie sur le bouton
'C', ce soit le premier élément de la zone de liste commencant par 'C' qui
se sélectionne automatiquement.
Je m'arrache les cheveux depuis 2 jours sur ce problème certainement très
simple à résoudre...
Merci pour votre aide et bonne journée.
Laurent