[VBA]ajouter nouvelle Node a XML fichier

[zidenne]

Bonjour
je veux avec VBA une Fichíer XML modifier:
le fichier existe deja et je veux ajouter une Node au milieux:
j´ai fais une image de mon Xml fichier et l´endroit de l´ajout.
je veux ajouter un nouveau Port:

<P-PORT-PROTOTYPE>
<SHORT-NAME>PpDaCoNr</SHORT-NAME>
<PROVIDED-COM-SPECS></PROVIDED-COM-SPECS>
<PROVIDED-INTERFACE-TREF DEST="CALPRM-INTERFACE">/PortInterface/PiDaCoNr</PROVIDED-INTERFACE-TREF>
</P-PORT-PROTOTYPE>

je utilise MSXML2
es ce que c´est possible?
merci

[Vince]

Déjà posté là : http://www.developpez.net/forums/d12...e-xml-fichier/

[zidenne]

mais c´est pour une document text, mon document et xml

[zidenne]

j´ai utiliser cette code mais ca ne foctionne pas, j´ai une erreur dans la compilation,dans l´avant dernier ligne(4)

Code :

1
2
3
4
5
xmlDoc.LoadXML ("//TOP-LEVEL-PACKAGES/AR-PACKAGE/ELEMENTS/CALPRM-COMPONENT-TYPE/PORTS/P-PORT-PROTOTYPE")
 Set xmlNode = xmlDoc.SelectSingleNode("//TOP-LEVEL-PACKAGES/AR-PACKAGE/ELEMENTS/CALPRM-COMPONENT-TYPE/PORTS/P-PORT-PROTOTYPE")
   Set xmlElement = xmlDoc.createElement("port_test")
                   xmlDoc.ChildNodes.NextNode.appendChild (xmlElement)
        xmlDoc.Save ("C:\temp Ordner\auf6\App.xml")