Modification dans un ListBox

Bonjour a toutes et tous, forum bonjour


J'ai un usf avec un listbox et une petite liste sur la feuil(Compte)

Je souhaiterai svp dans la ListBox1

(1) Ecrire en Vert quand un Item est cocher, sinon de couleur Rouge quand les Items ne sont PAS cochés

(2) Enlever la petite barre bleu qui s'affiche lorsque l'on coche (une ou des) cases, si possible bien sur

Merci pour votre aide et pour votre temps

bonne journée a tous

Cdlt Ray

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Private Sub UserForm_Initialize() Dim I As Integer   With ListBox1 ListBox1.Clear   For I = 1 To Sheets("Compte").[T50].End(xlUp).Row ListBox1.AddItem Sheets("Compte").Range("T" & I) Next   End With End Sub

---

Bonjour,
Il n'est pas possible d'avoir des polices de couleurs différentes dans un ListBox.
Si c'est un impératif, il faut te tourner vers le contrôle ListView
Un tutoriel sur le sujet Utiliser le contrôle ListView en VBA Excel

Salut Philippe,

Merci pour ta réponse, je vais revoir le tuto sur Listview

Sinon juste pour info a propos de la question N° (2) Enlever la petite barre bleu qui s'affiche lorsque l'on coche (une ou des) cases, si possible bien sur.

Bonne journée et merci

Cdlt Ray

Bonjour,
Pour la question 2, je ne pense pas que l'on puisse supprimer le ForColor des lignes sélectionnées mais je ne peux pas l'affirmer.

salut

Ok ce n'ai pas grave, je vais modifier pour utiliser Listview plus de possibilité qu'avec ListBox semble t'il


Merci pour tes infos, bonne après midi a toi

Cdlt Ray