Comment Modifier le remplissage pour remplir une listbox? SVP

C

Creepy

XLDnaute Accro

• 29 Décembre 2008

• #2

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Bonjour le Forum, Paritec,

Ci j'ai bien compris ta demande :

Code:

Private Sub CommandButton1_Click()
Dim Boucle As Integer
For Boucle = 0 To ListBox1.ListCount - 1 Step 1
    ListBox2.AddItem ListBox1.List(Boucle)
Next Boucle
End Sub

@+

Creepy

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #3

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Bonjour Crepy le forum,
je ne sais pas si tu as bien compris mais je vais essayé de suite et je te dis quoi dans 5 minutes
a+
Papou

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #4

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re Creepy,
Alors non c'est pas ça, je veux que lors du click sur la listbox 1 que la destination de la boucle qui est déjà présente prenne le chemin de la listbox2 à la palce de la feuille4 ligne 2
si tu as une autre idée je pense qu'il faut transformer en, ce que j'ai mis en dessous mais à la place des """"""" il faut mettre ce qui va bien et que je ne sais pas!!
a+
papou

Private Sub Listbox1_Click()
Dim w
For w = 0 To 9
Userform5.listbox2. """"""(2, w + 1)"""""" = Userform5.ListBox1.List(Userform5.ListBox1.ListIndex, w)
Next
End Sub

 

Vote positif 0 Vote négatif

C

Creepy

XLDnaute Accro

• 29 Décembre 2008

• #5

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re,

Essaie ca :

Private Sub ListBox1_Click()
ListBox2.AddItem ListBox1.Value
End Sub

Creepy

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #6

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re Creepy,
on va essayer de suite je reviens
Papou

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #7

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re Crepy le forum,
bah non toujours pas cela il faut savoir que la boucle est là car il y a 10 colonnes
enfin si tu as une autre idée
a+
Papou

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

Modérateur

• 29 Décembre 2008

• #8

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Bonjour

Petite question : tu es sûr que c'est sur l'évvènemeclick et non change que tu veux faire réagir ta macro ?

Un bonjour à Christophe au passage

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #9

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Bonjour Pascal, le forum,
Oui actuellement je remplissais la ligne 2 de ma feuille 4 et je veux modifier et remplir la listbox2 quand je click sur une ligne de ma listbox1.
merci d'avance de ta réponse
a+
papou

 

Vote positif 0 Vote négatif

C

Creepy

XLDnaute Accro

• 29 Décembre 2008

• #10

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

RE All,

Excuse moi j'avais pas vu les colonnes multiples. Comme quoi faire à la va vite ...

Bref

Code:

Dim Bcl As Integer
ListBox2.AddItem ListBox1.Value, ListBox2.ListCount
For Bcl = 1 To ListBox1.ColumnCount - 1 Step 1
    ListBox2.List(ListBox2.ListCount - 1, Bcl) = ListBox1.Column(Bcl)
Next

Ce code copie le contenu de la ligne sélectionné et de toutes les colonnes.

Bonjour Pascal

@+

Creepy

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #11

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re Creepy, Pascal le forum,
Bah on va retester cela de suite et je te dis dans 5 minutes
a+
Pascal

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #12

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Re Creepy le forum,
alors j'ai un message de défaut avec "" le type ne correspond pas""
je ne sais pas pourquoi, enfin toi tu vas savoir je pense
a+
Papou

 

Vote positif 0 Vote négatif

C

Creepy

XLDnaute Accro

• 29 Décembre 2008

• #13

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Tu peux nous mettre l'exemple en PJ STP ?

Merci

Creepy

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Décembre 2008

• #14

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

re Creepy,
je vais essayer mais il faut que je copie et que je coup plein de chose car le fichier est gros même zipé
a+
papou

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 30 Décembre 2008

• #15

Re : Comment Modifier le remplissage pour remplir une listbox? SVP

Bonjour Creepy le forum,
Alors j'ai trouvé ma bêtise en faisaint le fichier pour t'expédier, ta macro amrchait avec le nouveau et pas avec mon fichier d'origine !!!!
En fait ma bêtise est que je n'avais pas le même nombre de colonnes identique dans listbox1 et listbox2.
Donc pardon mais ta macro marche parfaitement
merci pour tout
a+
Papou

 

Vote positif 0 Vote négatif