Discussion :

[midoparis]

Bonjour à tous !!


J'ai un tableau Excel dans j'ai lequel j'ai plusieurs colonnes.
Je dois faire un traitement sur chaque colonne que l'utilisateur aura choisi via une listbox.

L'idéal serait de faire une boucle dans laquelle je dirai quelquechose du style :

for each aaa in listbox
...traitement avec la valeur de aaa...
next aaa

où aaa serait le listbox.index (le numero de la valeur selectionnée)
Ainsi, je récupèrerai le numero de la colonne sélectionnée et je pourrai faire mon traitement dessus.


Mon problème est pour la mise en place de cette boucle !!

Merci d'avance..


PS : si vous voyez une autre solution à mon probleme n'hesitez pas

[ucfoutu]

Bonjour,

Question imprécise, pour les raisons suivantes :

- Sous VB6 (la présente section du forum) , une listbox ne possède pas plusieurs colonnes réelles (il ne peut y avoir qu'une disposition d'affichage en colonnes, ce qui n'a rien à voir avec des colonnes distinctes)

- tu ne nous parles pas de ta valeur que tu as donnée à la propriété multiselect de ta listbox :

Alors :

1) passage en "revue" de tous les items (sélectionnés ou non) d'une listbox :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Command1_Click()
 For i = 0 To List1.ListCount - 1
   MsgBox List1.List(i)
 Next
End Sub

2) passage en revue des seuls items sélectionnés (si sélection multiple prédéfinie) d'une listbox :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Command1_Click()
  For i = 0 To List1.ListCount - 1
   If List1.Selected(i) Then
     MsgBox List1.List(i)
   End If
 Next
End Sub

Une autre fois : si tu développes bien sous VB6 et non sous VBA (pour Office)

[midoparis]

pour la difference vb6 ou vba (pour office) je suis pas sûr à 100% mais je pense que c'est du vb6 (je suis sous excel 2002, et je développe sous visual basic editor).

quand je parlais de colonne, c'est les colonnes de mon tableau excel. la listbox sera dans un userform que j'aurai créé et qui s'ouvrira lorsque l'utilisateur lancera la macro correspondante.

pour la valeur multiselect de la listbox, je ne vois pas exactement le lien avec ma demande, mais tu dois surement savoir, c'est le "1-fmMultiSelectMulti".

Sinon, sur les deux solutions que tu m'as donnée, je pense que celle qui repond le mieux a ma demande c'est la 2ème : ainsi, je pourrai executer mes traitements dans la boucle "if".


Pour mieux comprendre ma demande, je vais mieux expliquer ma situation :
- j'ai un tableau excel, qui est contruit comme une base de données (plusieurs colonnes, plusieurs lignes. la premiere ligne contient des champs, et les suivantes contiennent des valeurs).
- dans les champs, j'ai un numero d'identifiant par personne, et des propriétés sur ces personnes.

Mon objectif est d'identifier les lignes qui correspondent a la meme personne, et lorsqu'il trouve un bloc de plusieurs lignes sur la meme personne, de conserver entierement la premiere ligne, et de supprimer certaines infos des lignes suivantes. L'utilisateur doit au prealable choisir quelles colonnes il souhaite supprimer pour un meme identifiant.

C'est pour ça que je veut mettre une listbox où l'utilisateur peut choisir plusieurs entrées. Lorsqu'il appuiera sur le bouton de validation, il faut que je lance une boucle sur chaque valeur selectionnée dans la listbox, boucle qui supprimera les données lignes (prealablement calculées) seulement dans .


c'est un peu plus clair ?

en tout cas, si je peux utiliser le " i " dans ta deuxieme solution ça devrait repondre a mon probleme...

je te tiens au courant