Bonjour,
J'écris une macro qui charge un fichier XML avec la méthode DOM. Je me suis appuyé sur le tuto d'arkham (et grand merci au passage):
https://arkham46.developpez.com/arti...b/?page=page_4
J'ai activé la référence Microsoft XML, v6.0
Et ... la variable ne charge pas le XML.
Il n'y a pas de message d'erreur.
L'objet DOMDocument60 est bien instancié mais reste une coquille vide.
A quelques détails prêt (adaptation à Excel365), c'est la macro du tutoriel d'Arkham :
D'autant plus rageant que ça marche sans soucis avec CreateObject
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub ReadXMLFileXMLIndent() Dim oXML As msxml2.DOMDocument60, test As String Set oXML = New DOMDocument60 oXML.async = False oXML.Load ("D:\test.svg") test = oXML.XML 'test est vide ... End Sub
Si quelqu'un peut donner une piste. J'ai certainement oublié un truc évident que je ne vois pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Dim fso As Object, f As Variant, fichier_entier as string, NomFichier as string NomFichier = "D:\test.svg" Open NomFichier For Input As #1 Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.OpenTextFile(NomFichier, 1) fichier_entier = f.ReadAll 'ça marche nickel
Dernière précision, mon fichier test.svg est bien un fichier xml avec des balises, parfaitement conforme.
Merci pour vos réponses
Partager