VBA: XML, modification du texte d'un node
Possum3D
-
Possum3D -
Possum3D -
Bonjour à tous,
Je tourne depuis quelques temps sur un problème énervant.
J'ai un fichier xml du type:
--------------------------
--------------------------
Avec VBA, je souhaite donner une valeur à ce Node, donc obtenir:
--------------------------
--------------------------
Je fais donc:
et là, tout le contenu (node A, CDATA) se fait écraser par la valeur! j'obtiens alors:
--------------------------
--------------------------
Ma question est donc:
Y a t il un moyen simple d'éviter ça et "d'insérer" la valeur dans le node ? J'ai l'impression que ce problème est récurrent, et pourtant je n'ai pas mis la main sur une réponse acceptable jusqu'à présent.
Cordialement
Possum3D
Je tourne depuis quelques temps sur un problème énervant.
J'ai un fichier xml du type:
--------------------------
<item> <A> </A> <![CDATA[TOTO]]> </item>
--------------------------
Avec VBA, je souhaite donner une valeur à ce Node, donc obtenir:
--------------------------
<item> 123456789 <A> </A> <![CDATA[TOTO]]> </item>
--------------------------
Je fais donc:
monItem.text = 123456789
et là, tout le contenu (node A, CDATA) se fait écraser par la valeur! j'obtiens alors:
--------------------------
<item> 123456789 </item>
--------------------------
Ma question est donc:
Y a t il un moyen simple d'éviter ça et "d'insérer" la valeur dans le node ? J'ai l'impression que ce problème est récurrent, et pourtant je n'ai pas mis la main sur une réponse acceptable jusqu'à présent.
Cordialement
Possum3D
A voir également:
- Vba xml
- Xml download - Télécharger - Édition & Programmation
- Office xml handler - Télécharger - Traitement de texte
- Driveimage xml - Télécharger - Sauvegarde
- Excel compter cellule couleur sans vba - Guide
- Incompatibilité de type vba ✓ - Forum VB / VBA
2 réponses
Bonjour,
C'est bien trop complexe pour moi, mais à tout hasard... Passer par une variable intermédiaire :
C'est bien trop complexe pour moi, mais à tout hasard... Passer par une variable intermédiaire :
MaVar = 123456789 & monItem.Text monItem.Text = MaVar