LABUCHE XLDnaute Junior 5 Novembre 2007 #1 bonjour à tous je sollicite votre aide car je n'arrive pas a imposer une taille à ma deuxieme colonne de ma listbox en effet j'aimerai que celle ci puisse contenir uniquement 3 caracteres dans ce style listbox premiere colonne I2emcolonneI . I999I
bonjour à tous je sollicite votre aide car je n'arrive pas a imposer une taille à ma deuxieme colonne de ma listbox en effet j'aimerai que celle ci puisse contenir uniquement 3 caracteres dans ce style listbox premiere colonne I2emcolonneI . I999I
jeanpierre Nous a quitté Repose en paix 5 Novembre 2007 #2 Re : [vba excel] taille de la deuxieme colonne listbox Bonjour LABUCHE, re au forum, Regardes dans les propriétés de ta ListBox.... mais sans plus.......... Ou, mieux, joint un exemple.. Format Zippé. A te lire. Jean-Pierre Vote positif 0 Vote négatif
Re : [vba excel] taille de la deuxieme colonne listbox Bonjour LABUCHE, re au forum, Regardes dans les propriétés de ta ListBox.... mais sans plus.......... Ou, mieux, joint un exemple.. Format Zippé. A te lire. Jean-Pierre
LABUCHE XLDnaute Junior 5 Novembre 2007 #3 Re : [vba excel] taille de la deuxieme colonne listbox bonjour jeanpierre je pense avoir trouver le bon code pour que mes colonnes soient de taille differentes Code: ListBox1.ColumnCount = 2 ListBox1.ColumnWidths = "160; 10" le 160 et le 10 c 'est au pifometre Vote positif 0 Vote négatif
Re : [vba excel] taille de la deuxieme colonne listbox bonjour jeanpierre je pense avoir trouver le bon code pour que mes colonnes soient de taille differentes Code: ListBox1.ColumnCount = 2 ListBox1.ColumnWidths = "160; 10" le 160 et le 10 c 'est au pifometre
A abc XLDnaute Impliqué 5 Novembre 2007 #4 Re : [vba excel] taille de la deuxieme colonne listbox Bonjour, a tester if len(nom de la feuille.text)<>3 then MSGBOX "3 chiffres" & chr(10) & "Recommencer" end if A + Vote positif 0 Vote négatif
Re : [vba excel] taille de la deuxieme colonne listbox Bonjour, a tester if len(nom de la feuille.text)<>3 then MSGBOX "3 chiffres" & chr(10) & "Recommencer" end if A +