OVH Cloud OVH Cloud

Ré-initialiser une liste de sélection multiple

2 réponses
Avatar
Gringo
Une autre petite facile ... apr=E8s tout c'est vendredi !

Je veux faire un bouton pour d=E9s=E9lectionner tous les=20
champs d'une liste. Aussi banal que ca puisse paraitre, je=20
ne suis pas capable ! Il est vraiement temps que la fin de=20
semaine arrive !

Merci

2 réponses

Avatar
Anor
Bonjour,

Gringo :
| Une autre petite facile ... après tout c'est vendredi !
|
| Je veux faire un bouton pour désélectionner tous les
| champs d'une liste. Aussi banal que ca puisse paraitre, je
| ne suis pas capable ! Il est vraiement temps que la fin de
| semaine arrive !
|
| Merci

Pas si évident que ça .... par exemple si List0 est le nom de ta liste :

Private Sub CmdRAZ_Click()
Dim i As Variant
For Each i In Me!List0.ItemsSelected
Me!List0.Selected(i) = False
Next
End Sub

--
à+
Arnaud
--------------------------------------------------
*Avant toute chose* : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------
Avatar
Merci !
très simple et efficace. Pour l'autre réponse ... ayoye !
C'était vendredi et ca paraît !!! J'aurais dû m'en
rappeller ...

Un gros merci encore

-----Message d'origine-----
Bonjour,

Gringo :
| Une autre petite facile ... après tout c'est vendredi !
|
| Je veux faire un bouton pour désélectionner tous les
| champs d'une liste. Aussi banal que ca puisse paraitre,
je

| ne suis pas capable ! Il est vraiement temps que la fin
de

| semaine arrive !
|
| Merci

Pas si évident que ça .... par exemple si List0 est le
nom de ta liste :


Private Sub CmdRAZ_Click()
Dim i As Variant
For Each i In Me!List0.ItemsSelected
Me!List0.Selected(i) = False
Next
End Sub

--
à+
Arnaud
--------------------------------------------------
*Avant toute chose* : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------


.