Discussion :

[zx10]

Bonsoir,

Grace à vld44, je recommence ma galere mais maintenant avec une listview.

C'est vrai que le controle est plus sympa qu'une listbox,mais j'y arrive pas.

Avec ma listbox je la remplie comme ca:

Code :

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

1
2
 
frmresultat!MSHFlexGrid1.AddItem r.Offset(a, 0).Value & vbTab & r.Offset(a, 1).Value & vbTab & r.Offset(a, 2).Value & vbTab & r.Offset(a, 3).Value & vbTab & r.Offset(a, 4).Value & vbTab & r.Offset(a, 5).Value & vbTab & r.Offset(a, 6).Value & vbTab & r.Offset(a, 7).Value & vbTab & r.Offset(a, 8).Value

Et ca marche, par contre galere pour mis en page.

Avec le listview j'ai le titre des colonnes mais rien dedans.
j'ai je pense le debut du code mais arrive pas avec index, key, text,etc...

Code :

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

1
2
 
frmresultat!ListView1.ListItems.Add

Pouvez vous m'eclairer sur la suite du code pour pouvoir remplacer ma listbox.
Merci à vous (ceux qui prennent le temps de repondre )

[Vld44]

Salut,

Bon déjà utilise les "." et non les "!" pour accéder aux objets ça évitera les problèmes avec les recordsets ...

Comment utiliser une listview :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Public Sub myMethod()
Dim lvTruc as ListView 'Ca c'est pour l'exemple, en vrai c'est autodéclaré dans la form
Dim liMyListItem as ListItem
 
   set liMyListItem = lvTruc.listItems.add (...)
   'Cette commande ajoute une ligne (un listItem) au listview, mais ne remplit que la première colonne. 
   liMyListItem.listsubitems.add ...
   'Cette commande remplit la colonne suivante, tu dois les remplir une par une comme ça en leur fixant ou non des clés / index
 
End Sub

Pour information, on peut boucler en for each sur les listItems et même sur les listSubitems (les colonnes au delà de la première)

Si tu as besoin d'autre chose, no prob

[Le Pharaon]

Un peu de recherche dans le forum, tu trouveras un code pour remplir une listView de manière dynamique.

[zx10]

Bonjour,

Merci vld44 pour tes explications


Maintenant je peut supprimer ma listbox.
Je pense que je te redemanderais de l'aide quand j'aurais un peu plus avancé, si je trouve pas pour imprimer ou calculer une colonne.

Merci à vous TOUS