Lorsque vous utilisez une zone de liste sans s\u00e9lection multiple, il peut arriver d’avoir besoin de d\u00e9s\u00e9lectionner la ligne. Inutile de vous acharner sur la ligne s\u00e9lectionn\u00e9e avec votre souris, elle restera en surbrillance.<\/p>\n\n\n\n
Je vous livre ici ma m\u00e9thode pour enlever la s\u00e9lection :<\/p>\n\n\n\n
Dim itSel As Integer \n\nPrivate Sub Form_Open(Cancel As Integer) \n 'initialise \u00e0 -1 pour ne pas perturber la premi\u00e8re s\u00e9lection \n itSel = -1 \nEnd Sub \n\nPrivate Sub Liste_Click() \n 'la selection est identique \u00e0 la pr\u00e9c\u00e9dent \n If Me.Liste.ListIndex = itSel Then \n Me.Liste.ListIndex = -1 \n 'on d\u00e9selectionne itSel = -1 \n Else \n 'on fixe le choix pour la prochaine comparaison \n itSel = Me.Liste.ListIndex \n End If \nEnd Sub<\/code><\/pre>\n\n\n\nLa liste se nomme Liste. On d\u00e9clare une variable globale au formulaire, que l’on nomme itSel, elle permettra de conserver le pr\u00e9c\u00e9dent choix op\u00e9r\u00e9, soit un entier positif pour une s\u00e9lection et -1 pour la d\u00e9-s\u00e9lection.<\/p>\n\n\n\n
Sur l’ouverture du formulaire on consid\u00e8re que rien n’est s\u00e9lectionn\u00e9 et on attribue la valeur -1 \u00e0 itSel<\/strong>. Lorsqu’on clique sur la zone de liste, on v\u00e9rifie si le clic correspond \u00e0 la s\u00e9lection en cours au moyen de la propri\u00e9t\u00e9 ListIndex<\/strong>.<\/p>\n\n\n\nCette propri\u00e9t\u00e9 retourne un entier de 0 \u00e0 x ou x est le dernier item de la liste. Lorsque qu’on attribue une valeur \u00e0 ListIndex l’item correspond est s\u00e9lectionn\u00e9, par contre si l’on met -1 aucune ligne n’est s\u00e9lectionn\u00e9e.<\/p>\n\n\n\n
Bonne utilisation !<\/p>\n","protected":false},"excerpt":{"rendered":"
Lorsque vous utilisez une zone de liste sans s\u00e9lection multiple, il peut arriver d’avoir besoin de d\u00e9s\u00e9lectionner la ligne. Inutile de vous acharner sur la ligne s\u00e9lectionn\u00e9e avec votre souris, elle restera en surbrillance. Je vous livre ici ma m\u00e9thode pour enlever la s\u00e9lection : La liste … Continuer la lecture