Erreur 35601

[portillo]

Bonjour à tous!! j'ai un probleme avec un treeview, quand je le lance j'ai un erreur "35601" Element Not Found! Apparement l'erreur c'est mon DEPART qui est vide mais je ne sais pas comment faire!!!

Dim tw As MSComctlLib.TreeView
Dim Base, n
Private Sub UserForm_Initialize()
Dim Depart(1 To 961)
Set tw = Me.MonArbre
[BDALGE].Sort key1:=[BDALGE].Cells(1, 7), key2:=[BDALGE].Cells(1, 5)
n = [BDALGE].Rows.Count
Base = [BDALGE]
tw.Nodes.Add(, , "NoeudInit", "PROJET ALGER").Expanded = True 'Racine Arbre: Projet'
i = 1
Do While Range("pere")(i) <> ""
tw.Nodes.Add("NoeudInit", tvwChild, "Noeud Dep" & Base(i, 7), Base(i, 7)).Expanded = True
mpere = Range("pere")(i)
Do While Range("pere")(i) = mpere
i = i + 1
Loop
chef = Range("fils")(i - 1)
hierarchie mpere, chef
Loop

End Sub
Sub hierarchie(pere, fils)
nompere = Application.VLookup(pere, [BDALGE], 1, False)
n = [BDALGE].Rows.Count
Base = [BDALGE]
tw.Nodes.Add("NoeudDep" & Depart, tvwChild, "NoeudMat" & pere, nompere).Expanded = True vfils pere
End Sub

Voila quelqu'un qui puisse m'aider SVP!!

Merci
portillo

 

[Creepy]

Re : Erreur 35601

Hello le Forum, Portillo,

Tu peux mettre ton fichier en PJ que l'on puisse débugger le code STP ?

@+

Creepy

 

[portillo]

Re : Erreur 35601

pour question de confidialite j'ai effacé le vrai contenu voila mon fichier!!! j'espere votre aide!

Merci

 

[Creepy]

Re : Erreur 35601

Re,


tw.Nodes.Add("NoeudInit", tvwChild, "Noeud Dep" & Base(i, 7), Base(i, 7)).Expanded = True
tw.Nodes.Add("NoeudDep" & Depart, tvwChild, "NoeudMat" & pere, nompere).Expanded = True

@+

Creepy

 

[portillo]

Re : Erreur 35601

Salut Creepy desole j'ai pas compris la correction que t'as fait

 

[Creepy]

Re : Erreur 35601

Re,

Pas de correction tu as : "NoeudDep" d'un coté et "Noeud Dep" de l'autre, ca ne peux pas coller !

Creepy

 

[portillo]

Re : Erreur 35601

Salut creepy, bon j'ai rectifie mon erreur de frape et encore rien ça ne marche pas, t'as une autre idee?

Merci

 

[MichelXld]

Re : Erreur 35601

bonsoir


En complément de la réponse de Creepy, il me semble que la variable "Depart" reste vide ... ;o)

bonne soirée
michel