Mapper une source XML.

Bonsoir,

J'ai un fichier XSD que je souhaite utiliser pour ensuite importer des fichiers XML.

Comment faire en VBA la partie qui consiste à prendre l'arborescence complète et à la poser sur la cellule A1 pour mapper l'ensemble des éléments ?

l’enregistreur de macro zappe cette partie, et je ne trouve que peu de doc la dessus.

Code:

---

1 2 3 4 5 6 7 8 9 10

Set MyMap = ActiveWorkbook.XmlMaps.Add( _ "c:\xml\FichierEDI.xsd" , "FichierEDI")   MyMap.Name = "FichierEDI"   '############ICI ################# 'MAPPAGE AVEC A1:AF1   ActiveWorkbook.XmlMaps("FichierEDI_Mappage").Import URL:= _ "c:\xml\20181220000001.xml"

---