Listview find

L

Lu K

XLDnaute Occasionnel

• 12 Mai 2011

• #2

Re : Listview find

Re-bonjour,

J'ai essayé un truc comme ça , sans résultat

Private Sub CommandButton3_Click()
Set x = ListView1.ListItems(ListView1.SelectedItem.Index).ListSubItems(9).Find("Equipe 1", , xlValues, 1, 1, 2, 0)
If Not x Is Nothing Then x.Select
Sheets("données").Range("a2") = ListView1.ListItems(ListView1.SelectedItem.Index).ListSubItems(5).Text
End Sub

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

L

Lu K

XLDnaute Occasionnel

• 13 Mai 2011

• #3

Re : Listview find

Personne pour mon problème, sniff !!!

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 13 Mai 2011

• #4

Re : Listview find

re ^^

tu n'aurais pas un petit bout de fichier à nous fournir (usf + code d'initialisation du listview).

perso, j'ai la flemme d'en construire un

a plus

 

Vote positif 0 Vote négatif

L

Lu K

XLDnaute Occasionnel

• 13 Mai 2011

• #5

Re : Listview find

Bonjour Hervé

Et encore merci de répondre à mes question.

J'ai trouvé une solution avec une boucle :

Code:

For c = ListView1.ListItems.Count To 1 Step -1
If ListView1.ListItems(c).ListSubItems(9).Text = "valeur" Then
ligne = ListView1.ListItems(c).Index
Exit For
End If
Next c

Et en plus ça marche !

 

Vote positif 0 Vote négatif

YANN-56

XLDnaute Barbatruc

• 13 Mai 2011

• #6

Re : Listview find

Bonjour Lu_k, Hervé, et à ceux qui passeront par ici,

Lu_k: Rappelle-moi le nom du dernier Fichier que je t'ai adressé;
, ou joins le ici, et je pourrai très vite te proposer une solution. 🙂

Amicalement, et à plus tard,

Yann

 

Vote positif 0 Vote négatif

L

Lu K

XLDnaute Occasionnel

• 13 Mai 2011

• #7

Re : Listview find

Bonjour Yann,

Je travail toujours sur le même dossier ! Et oui 15 jours de vacances ça aide pas !
Mais j'ai fait pas mal de changement depuis, j'arrive sur la fin. Je préfère finir un peu plus mon projet avant de te le transmettre, faut pas abuser des bonnes choses !

Merci pour votre aide si précieuse.

 

Vote positif 0 Vote négatif

YANN-56

XLDnaute Barbatruc

• 13 Mai 2011

• #8

Re : Listview find

Re Lu_k,

P.S. Je n'avais pas vu ton dernier Post. Désolé.
Tu peux aussi ajouté:

Code:

Me.ListView1.ListItems(c).EnsureVisible

Bonne suite dans ton projet, 🙂

Amicalement,

Yann

 

Vote positif 0 Vote négatif