Sujet Précédent Sujet Suivant

Problème en VBA Excel

Résolu/Fermé
backin Messages postés 18 Date d'inscription jeudi 30 juin 2005 Statut Membre Dernière intervention 20 février 2007 - 16 août 2005 à 09:27
backin Messages postés 18 Date d'inscription jeudi 30 juin 2005 Statut Membre Dernière intervention 20 février 2007 - 16 août 2005 à 18:04
Salut
j'ai de nouveau une colle sur de la programmation en VBA sur Excel. J'ai un bouton, une listbox et une textbox. Je souhaite que, si aucune valeur de ma listbox n'est sélèctionnée quand je clic sur mon bouton, le message de la textbox s'affiche. Je ne trouve pas le code pour dire que ma listbox n'a pas de valeur sélèctionnée :

if listbox.value = ? then
...

que dois-je mettre à la place de ?

Peut-être que je plante complètement ? quelqu'un peut-il m'aider ?

Merci
A voir également:

4 réponses

Réponse 1 / 4
Iger Messages postés 340 Date d'inscription samedi 5 juin 2004 Statut Membre Dernière intervention 20 mars 2007 85
16 août 2005 à 10:56
que dois-je mettre à la place de ?
Essaies -1
0
Réponse 2 / 4
Utilisateur anonyme
16 août 2005 à 15:18
Bonjour,

Autre suggestion : 

    Flag = False
    For Boucle = 1 To ListBox1.ListCount - 1
        If (ListBox1.Selected(Boucle) = True) Then
            Flag = True
        End If
    Next Boucle
    If (Flag) Then
        MsgBox "1 item de selectionné !"
    Else
        MsgBox "Aucun item de selectionné !"
    End If


Lupin
0
Réponse 3 / 4
vince75 Messages postés 5 Date d'inscription mardi 16 août 2005 Statut Membre Dernière intervention 16 août 2005 5
16 août 2005 à 15:26
Il est peut-être beaucoup plus simple d'utiliser la propriété ListIndex

la valeur de listindex est le numéro de l'item sélectionné dans la liste, en commençant à 0 pour la première ligne.

Si aucun élément n'est sélectionné, listindex vaut -1

Ca marche également pour les Combobox
0
Réponse 4 / 4
backin Messages postés 18 Date d'inscription jeudi 30 juin 2005 Statut Membre Dernière intervention 20 février 2007
16 août 2005 à 18:04
merci pour toutes ces réponses j'ai trouvé mon bonheur!
0