ListBox 3 Col mais largeur différente ?

mutzik

XLDnaute Barbatruc

• 17 Juin 2009

• #2

Re : ListBox 3 Col mais largeur différente ?

bonjour,

comprends pas ?
columnwidth, tu mets par ex 100; 50; 250
et tu as trois largeurs différentes

ou je suis bon pour le zop ....

 

Vote positif 0 Vote négatif

M

malabarbe

XLDnaute Occasionnel

• 17 Juin 2009

• #3

Re : ListBox 3 Col mais largeur différente ?

Oui, c'est bien cela !

il falait séparer les largeurs par des " ; "

Autre chose si c'est possible :

Lors des Additem, comment choisir la colonne de destination ?

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 17 Juin 2009

• #4

Re : ListBox 3 Col mais largeur différente ?

Bonjour,

Malabarbe (ou Malpoli???)

Le minimum de politesse ou de respect envers les bénévoles qui t'aident est de répondre (soit par un remerciement si cela fonctionne, soit par un ajout de précision le cas échéant...) AVANT de poser une autre question..

+1 dans ma liste d'ignorés... 😡😡😡

le fil :

https://www.excel-downloads.com/threads/actualisation-et-affichage-listbox.122308/

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 17 Juin 2009

• #5

Re : ListBox 3 Col mais largeur différente ?

re,

perso, je fais comme cela :

Sub Remplir_lbComptes()
Dim tableau() As String

nbItems = Sheets("bd.Comptes").Range("A" & 65000).End(xlUp).Row - 10 'parce que mes donées commencent en ligne 10
ReDim tableau(1 To nbItems, 1 To 4) As String ; 1 to 4 pour 4 colonnes
For cpt = 1 To nbItems
tableau(cpt, 1) = Sheets("bd.Comptes").Range("A" & cpt + 10)
tableau(cpt, 2) = Sheets("bd.Comptes").Range("C" & cpt + 10)
tableau(cpt, 3) = Sheets("bd.Comptes").Range("B" & cpt + 10)
tableau(cpt, 4) = Sheets("bd.Comptes").Range("F" & cpt + 10)
Next
lb_Comptes.List = tableau ' on affecte le tableau à la listbox
lb_Comptes.ListIndex = -1 'on ne selectionne aucun élément
End Sub

ne pas oublier de mettre option base 1 en début de module

 

Vote positif 0 Vote négatif

M

malabarbe

XLDnaute Occasionnel

• 17 Juin 2009

• #6

Re : ListBox 3 Col mais largeur différente ?

Désolé bhbh, ce n'est pas mon habitude.
Tu m'a déjà aidé et j'avais remercié !

J'étais tellement content que dans la foulée, j'ai emboité sur la question suivante.

Donc, Merci pou ta première réponse.

Avous lire.

 

Vote positif 0 Vote négatif

M

malabarbe

XLDnaute Occasionnel

• 17 Juin 2009

• #7

Re : ListBox 3 Col mais largeur différente ?

Salut mutzyk,

Ok pour ton code, mais je voudrais plus simple car ce n'est qu'une petite liste !
Pour remplir la colonne de gauche, je fais :

Code:

ListBox1.AddItem Worksheets("Dates").Cells(i, 2)

Comment adapter ce code pour écrire en colonne 2
les données ce la cells(i,3) ?

A vous lire.

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 17 Juin 2009

• #8

Re : ListBox 3 Col mais largeur différente ?

re,

ListBox1.ListFillRange = "A1:c10"

fct très bien, dans ce cas

 

Vote positif 0 Vote négatif

M

malabarbe

XLDnaute Occasionnel

• 17 Juin 2009

• #9

Re : ListBox 3 Col mais largeur différente ?

Je ne comprends pas ce que vous voulez dire !

 

Vote positif 0 Vote négatif

M

malabarbe

XLDnaute Occasionnel

• 17 Juin 2009

• #10

Re : ListBox 3 Col mais largeur différente ?

Si, finalement j'ai capté

Merci à tous pour vos conseils

Post terminé

@ +

 

Vote positif 0 Vote négatif

klin89

XLDnaute Accro

• 18 Juin 2009

• #11

Re : ListBox 3 Col mais largeur différente ?

Bonjour à tous,
Bonjour malabarbe,

Pour compléter le fil et baliser une future recherche, vois ci-dessous la solution de bqtr :

https://www.excel-downloads.com/threads/colonne-listbox-autosize.79641/

Amicalement klin89

 

Vote positif 0 Vote négatif