Listbox = ligne sélectionné en rouge.

  • Initiateur de la discussion Initiateur de la discussion apdf1
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

apdf1

XLDnaute Impliqué
Bonjour,

J'ai un USF avec listbox. Est il possible d'avoir un code qui me permet d'avoir la ligne que j'ai sélectionné en rouge.

Voici ci-dessous le debut de mon code avec la ligne que j'ai ajouté mais qu'il ne fonctionne que sur la ListView "If SelectedItem.ListSubItems(I).ForeColor = &HFF&".

Code:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
     Dim ListIndex As Integer
  
     For ListIndex = 0 To (ListBox1.ListCount - 1)
        If ListBox1.Selected(ListIndex) = True Then
        [COLOR="red"]If SelectedItem.ListSubItems(I).ForeColor = &HFF&[/COLOR]                 Me.T1 = Me.ListBox1.List(ListIndex, 0) ' Ref
                 Me.T2 = Me.ListBox1.List(ListIndex, 1) ' Ref
                 Me.T3 = Me.ListBox1.List(ListIndex, 2) ' Nom
                 Me.T4 = Me.ListBox1.List(ListIndex, 3) ' Ref


Si quelqu'un peut m'aider je vous remercie par avance et vous souhaite une bonne journée

Cordialement

Max
 
Re : Listbox = ligne sélectionné en rouge.

Re 🙂,
Rien n'est vraiment impossible pour un "Barbatrucker" ;-)
Enfin c'est un gros délire, just for the Fun...
Et t'es fier de toi 😛 !
C'est vrai que c'est original, mais pour le rendre compatible pour APDF1, il y aurait un sacré boulot derrière, rajouter des modules de classe pour changer de couleur au clic, mémoriser les listes, etc. 🙄...
Je ne pense pas que le jeu en vaille la chandelle 😉...
Bonne journée 😎
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
536
Réponses
4
Affichages
549
Réponses
17
Affichages
2 K
Réponses
1
Affichages
740
Retour