Discussion :

[rampage92]

Bonjour a tous,

J ai cree une liste view avec des checkbox en colonne 1. Je voudrais que la colonne 4 soit egale a la colonne 2 fois la colonne 3 si la checkbox est cochee. VOus avez des idees de syntaxes ?


Merci

[Jean-Philippe André]

Bonjour,

un peu de lecture qui te sera des plus utiles !
http://silkyroad.developpez.com/VBA/ListView/

[rampage92]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton_Accept_Click()
 
For i = 1 To ListView_Trading.ListItems.Count
 
If ListView_Trading.ListItems(i).Checked = True Then
 
ListView_Trading.ListItems(i).ListSubItems(4).Text = "Test"
 
End If
 
Next i
 
End Sub

Me donne une erreur, Index out of bounds PK?

[Jean-Philippe André]

Les compteurs vont de 0 a n-1

[rampage92]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton_Accept_Click()

For i = 1 To ListView_Trading.ListItems.Count - 1

If ListView_Trading.ListItems(i).Checked = True Then
 
ListView_Trading.ListItems(i).ListSubItems(4).Text = "Test"

End If

Next i

End Sub

ca ne marche toujours pas meme erreur

[Jean-Philippe André]

Tu as combien de subitems ?

si tu en as a 4, ca va de 0 a 3