trouble avec listbox trop long dans row

Re : trouble avec listbox trop long dans row

bonjour Dennnisss le forum dans proprietes de ta listbox colomncount = 6
salutations
pour la 1 qst peut etre comme cela
Set plage = .Range("B5:b" & .Range("B65536").End(xlUp).Row)
tu peus aussi simplifier
Private Sub userform_initialize()
WebBrowser1.Navigate "C:\gif\blocnote.Gif"
Dim tablo As Variant
tablo = Range("b5:g" & Range("b65536").End(xlUp).Row)
ListBox1.List = tablo
End Sub
'attention dans proprietes de ta listbox ne pas oublier
'ColumnCount = 6 'ColumnWidths = "30;30;30;30;40;150"

'ou pour ne pas changer dans proprietes listbox

Private Sub userform_initialize()
WebBrowser1.Navigate "C:\gif\blocnote.Gif"
Dim tablo As Variant
tablo = Range("b5:g" & Range("b65536").End(xlUp).Row)
ListBox1.List = tablo
With Controls("ListBox1")
.ColumnCount = 6
.ColumnWidths = "30;30;30;30;150;40"
End With
End Sub'resalutations

Re : trouble avec listbox trop long dans row

merci beaucoup excalibur

c,est ok maintenant ca marche et je vient d,apprendre autre chose de nouveau moi qui cherchait dans mes variables

merci encore

dennnisss😉 😱 😱

maintenant j'ai trouver sur le site une facon que mdf a creer pour mettre de la couleur dans le listbox
j'ai fait parvenir son petit programme que je vais etudie et essayer de decortiquer par la suite je vais vous consulter


merci encore excalibur

dennnisss