J'avoue que je sèche sur un problème depuis ce matin :
Je travaille avec deux arbres XML. Il faut passer un des noeuds du premier arbre et l'ajouter dans le second arbre.

Voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
          LO_XmlFO1.Load (ThisWorkbook.Path + "\TMP\Arbre1.xml")
          Set LO_Node1 = LO_XmlFOn.selectSingleNode("//page")
          MsgBox "avant " & LO_Noden.childNodes.Length
          Set LO_Node = LO_Noden.appendChild(LO_Node1)
          MsgBox "après " & LO_Noden.childNodes.Length
Les variables Lo_Node1 et LO_Noden sont valides (pas égales à nothing)
Dans LO_Node je récupère bien une valeur après l'ordre AppendChild
Malgré cela les deux messages MsgBox me retournent la même valeur : 1

Si quelqu'un a une idée je prends.