variable sur comptage de checkbox coché

Bonjour,
lorsque je clique sur une de mes cases à cocher dans la listview, un message d'erreur sur la variable nbrcheck apparait (elle serait incompatible pour le comptage que j'esssaie d'effectuer).

Pourriez vous m'expliquer mon erreur?

Code:

---

1 2 3 4 5 6 7 8 9 10

ListView_ItemCheck(ByVal Item As MSComctlLib.ListItem) dim nbrcheck as Integer nbrcheck=0   If Item.Checked = true Then 'ligne sélectionnée nbrcheck=nbrcheck + CInt(ListView.ListItems(Item.Index).ListSubItems(1).Text ) Else 'la ligne est désélectionnée nbrcheck=nbrcheck - CInt(ListView.ListItems(Item.Index).ListSubItems(1).Text ) End If End Sub

---

Bonjour,

Si tu veux compter le nombre d'éléments cochés d'un ListView nommé ListView1:

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem) Dim nbrcheck As Integer Dim ListViewItem As ListItem   For Each ListViewItem In ListView1.ListItems If ListViewItem.Checked Then nbrcheck = nbrcheck + 1 Next MsgBox nbrcheck End Sub

---

Plus d'information sur le ListView ici

Cordialement,

Tirex28/