row source

[news]

Bonjour à tous du forum,

je m'adresse à vous, comme ne je ne peux pas résoudre comment mettre les données de trois colonnes dans une listbox d'un Userform

dans la feuille"data" il y a les données suivantes :
A2 = fruits (titre)
A3 = pomme
A4 = cerises
A5 = orange
...

B2 = quantité(correspondants aux divers fruits)
B3 = 5 ( quantité de 5 pommes )
B4 = 8 ( quantité de 8 cerises )
B5 = 2
...

C2 = prix(correspondants aux divers fruits)
C3 = 0,50 ( prix de pomme )
C4 = 1,00 ( pris de cerises )
C5 = 1,50
...


mis le code suivant dans listbox4 et listbox5 du Userform

ListBox4.RowSource = "data!A2:A106" & "data!C2:C106"
ListBox5.RowSource = "data!A2:C106"

mais dans le Userform il n'est pas affiché toutes les colonnes dans la listbox4 et dans Listbox5, mais uniquement la colonne de gauche (RangeA2:A106).

Comment résoudre, que les colonnes A2:C106 sont affichées dans listbox5
et les colonnes A2:A106 et C2:C106 sont affichées dans listbox4 ?

merci d'avance de vos solutions,

news

 

[youky(BJ)]

Re : row source

Bonjour News,
Dans les propriétés des listbox4 et 5 indique à CoulmnCount=3
et
ListBox4.RowSource = "data!A2:C106"
en Initialize de l'userform...UserForm1.ListBox4.ColumnWidths = "60;0;60"
Remarque le"0" qui mets à 0 la largeur de la colonne2, et ajuste à ta guise les autres colonnes(les 60)
Pour listbox5 seul columcount en propriété va suffir
A+

 

[news]

Re : row source

bonjour à tous du forum,

re: youky(BJ)

en ajoutant le code dans Sub UserForm_Initialize() cela fonctionne,

mais les montants des prix de C2:C106 sont affichés centrés dans listbox,
comment on peut les afficher à gauche
et si montant est ngéatif est affiché autre couleur, p.ex rouge

 

[youky(BJ)]

Re : row source

Pas bon ton code...
Comme ceci tout en Initialize

Private Sub UserForm_Initialize()
ListBox4.ColumnCount = 3
ListBox4.ColumnWidths = "60;0;60"
ListBox4.RowSource = "data!A2:C106"
ListBox5.ColumnCount = 3
ListBox5.ColumnWidths = "60;60;60"
ListBox5.RowSource = "data!A2:C106"
End Sub

un petit + pour trouver la derniere ligne (soit 106) et remplacer si besoin
'ligne à placer en tête de code
bas=Sheets("data").[C65536].end(xlup).row
et ensuite le code
ListBox4.RowSource = "data!A2:C" & bas


idem pour listbox5

 

[news]

Re : row source

Re: youky(BJ)
cela fonctionne bien,

mais comme y a des montants dans la colonne3 (C3:C106), les montants ne sont pas affichés à droite,
mais centré ou à travers ou postionnés à différent positions dans la listbox4 et listbox5.
Un montant est affiché à gauche, l'autre au milieu, etc.

Comment résoudre que les montants sont bien affichés à la même position ?,

news

 

[youky(BJ)]

Re : row source

Re ,
Seul façon de procéder pour manipuler l'alignement des colonnes
Utilisez un controle ListView plutot qu'un ListBox
Avec ce controle tout ce fait par code, les exemples ne manquent pas sur le forum
Meme en Google tape Listview
Reviens ici si PB

 

[klin89]

Re : row source

Bonjour à tous,
Bonjour youky(BJ), news

Mieux qu'un long discours, vois l'exemple de bqtr ci-dessous :

https://www.excel-downloads.com/thr...ste-obtenu-a-partir-dun-fichier-excel.103677/

Amicalement klin89

 

[youky(BJ)]

Re : row source

Re, et Bonjour klin89,
Comme j'ai fait ce petit fichier je le mets
il répond directement à la question
a+

 

[news]

Re : row source

Bonjour à tous du forum,

Re: klin89,

très bien est ce code indiqué dans le lien, comme la largeur des colonnes s'adapte directement dans listbox.

En utilisant plusieurs colonnes dans une listbox, j'ai remarqué que les données se postionnent tj. à gauche des colonnes affichées dans la listbox

Est-ce possible d'indiquer que les montants de la 3e colonne ( il s'agit de chiffres ) sont positionnés à droite de la listbox ?
Et si un montant est négativ, que ce montant est affiché en d'autre couleur,

merci youky(BJ) pour l'exemple avec Listview, mais je ne peux pas ouvrir le fichier du aux restrictions d'utilisation d'administrateur du job,

va l'ouvrir plus tard,

news

 

[klin89]

Re : row source

Re à tous,

Tout ce que tu demandes n'est possible qu'avec une listview.

Voir la réponse de bqtr et le fichier d'Hervé dans les 2 fils ci-dessous.

https://www.excel-downloads.com/threads/alignement-des-chiffres-dans-une-listbox.106483/

https://www.excel-downloads.com/threads/listbox-et-couleur-de-texte.60304/

Amicalement Klin89