comptage de selection (listbox multiselect)

Bonjour Lionel,

Utilise la propriété Selected :

Dim I As Integer
With ListBox1
For I = 0 To .ListCount - 1
If .Selected(I) Then MsgBox .List(I) & " sélectionné."
Next
End With

Bonne chance,

Croquignol

Bonjour à tous

J'ai une listbox multiselect avec x entrée.

Mon problème est de compter les sélections que l'utilisateur fait.
(il peut sélectionner sélectionner ou désélectionner)
Ce qui m'interesse ce sont les sélections actives avant qu'il appuie sur le
bouton de commande qui continue ma macro

Merci à tous ceux qui pourront m'aider

--
__________________________________________

Amicalement

Lionel de Luca
ldeluca@tiscali.fr
__________________________________________

Salut Lionel !

Tu vien de trouer le moyen le plus efficace de te retrouver avec tout plein
de SPAM dans ta BAL !!!

Comme déjà indiqué plusieurs foi sur diférents groupes, ne mets pas ton
adresse en clair à disposition de tous les spameur !!!

Pour ce qui concerne ton adresse e-mail, je pense que la meilleur façon de
te débarrasser de tout tes spams c'est d'en refaire et D'APPLIQUER ce que
pas mal de peronnes t'ont conseillé !! Ton adresse ne peut pas être effacée
de la liste des spameurs et cela de façon irrémédiable !!!! Alors fais un
effort ;-))

Salutations
Dédé

--
Pour répondre, enlever le NOSPAM
"Lionel de Luca" <l.deluca@tiscali.fr> a écrit dans le message de
news:es8bg7vkDHA.2964@tk2msftngp13.phx.gbl...

Bonjour à tous

J'ai une listbox multiselect avec x entrée.

Mon problème est de compter les sélections que l'utilisateur fait.
(il peut sélectionner sélectionner ou désélectionner)
Ce qui m'interesse ce sont les sélections actives avant qu'il appuie sur
le

bouton de commande qui continue ma macro

Merci à tous ceux qui pourront m'aider

--
__________________________________________

Amicalement

Lionel de Luca
ldeluca@tiscali.fr
__________________________________________

Merci Dédé,

Maintenant cette adresse sera pour les news et chat

1 Autre pour ma messagerie

Je suis novice sur internet
--
Amicalement

__________________________________________

Lionel de Luca
ldeluca@tiscali.fr