Bonjour à tous.
Je suis en train de développer une application qui ouvre un fichier XML contenant plusieurs données imbriquées. Jusqu'à il y a quelques jours tout se passait sans problème : quand j'ouvrais mon fichier XML avec Excel (sans passer par VBA) il s'ouvrait en 1-2 sec. Maintenant il me faut attendre jusqu'à 1 min pour l'ouvrir ! Je comprends pas du tout ce qu'il s'est passé et je n'ai pas changé de version d'Excel.
Ce problème se répercutant sur l'ouverture du fichier XML via VBA de cette manière :
Et si j'utilise "Workbooks.OpenXML(strDirOfXML)" cela fait pareil.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Dim wbXML As Workbook Set wbXML = Workbooks.Open(strDirOfXML)
Existe t'il une manière d'ouvrir mon fichier XML de manière la plus rapide possible, voir peut être de ne pas l'ouvrir mais récupérer ses données pour les mettres dans mon fichier Excel sur lequel je ferais mais requètes.
Pour infos une fois le fichier XML ouvert, je copie les infos de cette manière :
EDIT : Problème résolut car cela ne venait pas de l'ouverture du fichier XML.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Set wsXML = wbXML.Sheets.Item(1) wsXML.Range("E2:" & wsXML.Range("A1").SpecialCells(xlCellTypeLastCell).Address).Copy _ wsBdd.Range("A1")
Partager