probleme modification avec foncton recherche d'un USF/listview

[melissa bdx]

Bonjour,

J'ai un petit souci avec un fichier que j'ai modifié .
Le fichier comporte une saisie de données avec un USF listview ,j'y ai ajouté une fonction recherche qui fonctionne bien mais j'ai une erreur qui se produit lorsque j'effectue une sélection de ma recherche dans la listview et que je veux la modifier en accédant à USF de modif.(erreur d'éxecution 13
Je ne sais pas si il y a une solution à mon problème mais je sollicite les compétences du forum pour me donner un coup de pouce.

D'avance merci à tous

 

[Robert]

Re : probleme modification avec foncton recherche d'un USF/listview

Bonsoir Melissa, bonsoir le forum,

Je ne maîtrise pas du tout les Listview et je n'ai donc pas la solution mais en faisant tourner ton code j'ai remarqué une anomalie. Le label LblLigne est vide ce qui fait que la ligne :

L = CLng(LblLigne)

plante obligatoirement...

 

[melissa bdx]

Re : probleme modification avec foncton recherche d'un USF/listview

Bonsoir Robert,

Oui j'ai vu cela aussi mais je ne comprend pas d’où peut venir l'erreur

merci de ta réponse

 

[ChTi160]

Re : probleme modification avec foncton recherche d'un USF/listview

Bonsoir melissa bdx
Bonsoir Robert
Bonsoir le Forum

ci dessous d'ou vient le problème Lors de la recherche et l'envoi de la Ligne le report n'était pas bon j'ai donc mis 8 à la place de 9 (en rouge dans la procédure)

Sub IniLvw(a As Long)
With ListView1
.ListItems.Add , , Sheets("BD").Cells(a, 1)
X = .ListItems.Count
For i = 1 To 8
.ListItems(X).ListSubItems.Add , , Sheets("BD").Cells(a, i + 1)
Next
.ListItems(X).ListSubItems.Add , , a
For i = 1 To .ListItems.Count
If .ListItems(i) = TextBox1 Then .ListItems(i).Bold = True
For j = 1 To .ColumnHeaders.Count - 1
If .ListItems(i).ListSubItems(j).Text = TextBox1 Then
.ListItems(i).ListSubItems(j).Bold = True
End If
Next j
Next i

End With

End Sub

Bonne fin de Soirée
Amicalement
Jean marie

 

[Robert]

Re : probleme modification avec foncton recherche d'un USF/listview

Bonjour Melissa, bonjour mon cher Jean Marie, bonjour le Forum,

Comme le fichier de Melissa était clair j'ai décidé de me lancer dans les ListView (Bilan 3 points de suture comme aurait dit MatiChoux)...
Avec un exemple aussi bien construit, ça a été relativement simple de comprendre leur fonctionnement. Je me suis même permis d'y rajouter mon grain de sel. J'ai commenté les parties rajoutées ou modifiées mais peut-être pas toutes...
Merci donc Melissa car j'ai enfin appris à utiliser ce contrôle.

Le fichier modifié :

 

[melissa bdx]

Re : probleme modification avec foncton recherche d'un USF/listview

Bonsoir Robert

Tu as vraiment fait un beau travail.

A bientôt