Salut à tous, je suis entrain d'écrire une fonction qui crée une liste :
J'ai malheureusement l'erreur : "Membre de méthode ou de donnée introuvable" quand je lance la fonction, et la ligne contenant le premier Liste.AddItem est surlignée, comment faire ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 Dim i As Integer Dim j As Integer Dim l As Integer Liste.RowSource = "" While (i < 100) If Form_FLT.Treeview1.Nodes("k" & i).Checked = True Then Liste.AddItem ("k" & i) While (j < 100) If Form_FLT.Treeview1.Nodes("k" & i & j).Checked = True Then Liste.AddItem ("k" & i & j) While (l < 100) If Form_FLT.Treeview1.Nodes("k" & i & j & l).Checked = True Then Liste.AddItem ("k" & i & j & l) End If Wend End If Wend End If Wend
Merci d'avance !
Partager