Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Manipuler les données XML à partir d'Excel

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Loulou27
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
L

Loulou27

XLDnaute Nouveau
Bonjour,

Voilà mon sujet :
Je souhaite à partir d'excel lire les données dans un fichier XML

De ce que je comprends, le xml est potentiellement comme des répertoires => copie par un logiciel pour comprendre la structure car je n'ai aucune connaissance au sujet des xml



Ce que j'ai en tête, c'est en partant de cette référence "OR-xxxxx" (rechercher par le biais d'une feuille excel), je remonte dans le "répertoire parent" VddEcu pour ensuite rechercher d'autres référence dans les autres "sous-répertoires" pour les vérifier

J'espère avoir été compréhensif !!!

Merci pour votre aide / retour


N.B : bien sûr, j'arrive à remettre au excel le fichier xml mais cela n'est pas très pratique pour travailler dessus et je pense que le mieux est de rester en xml

Je pense que le format du fichier xml n'est pas conforme mais je ne peux pas le modifier car il vient d'un outil que j'utilise



Si je modifie l'entête du xml, j'ai du mieux

avant :
<VddDiagProjects xmlns="http://......" xmlns:xsd="http://....." xmlns:xsi="http://....." xsi:schemaLocation="http://..... http://..... http://..... >

après :
<VddDiagProjects>

Dois-je donc passer par un fichier temporaire qui prendrai le xml souhaité pour l'enregistrer dans le même format avec l'entête modifié ou y'a-t-il une astuce ?
 
Dernière édition:
Trier par date Trier par votes
Bonjour,

J'avais déjà essayé et je viens de le refaire mais cela me donne tous les 'ODX 2.0.1' de tous les VddEcu et non juste ceux dans le VddEcu dans lequel je suis


Pourtant, je suis bien dans un VddEcu et non plus haut dans le schéma xml
Set nodes = xml.SelectNodes("//ns:VddEcu")

For Each node In nodes

Set ODX = node.SelectNodes("//ns:vddDiagSpecifications/ns:VddDiagSpecification/ns:VddArticle/ns:vddFiles/ns:VddFile[ns:typeFile='ODX 2.0.1']")

Cela me ressort 98 et non 4 comme cela devrait
 
Vote positif 0 Vote négatif
nullosse à dit:
Salut,
Cela correspond à quoi 98 et 4 dans le fichier xml de test ? à quelle ligne ?
Nullosse
Cliquez pour agrandir...
A rien car comme il n'est pas complet; 98 et 4 c'est avec le fichier complet

mais si tu fais avec le fichier test, tu dois avoir 1 à chaque VddEcu

Set ODX = node.SelectNodes("ns:vddDiagSpecifications/ns:VddDiagSpecification/ns:VddArticle/ns:vddFiles/ns:VddFile[ns:typeFile='ODX 2.0.1']")
==> 1

Set ODX = node.SelectNodes("//ns:vddDiagSpecifications/ns:VddDiagSpecification/ns:VddArticle/ns:vddFiles/ns:VddFile[ns:typeFile='ODX 2.0.1']")
==> 3

Cela fonctionne si on ne mets pas les "//" donc pas besoin de se prendre la tête ;-)


Ce que je voulais savoir c'était si il était possible de faire un noeud à partir d'un noeud comme je pensais
Set mess_node = node.SelectNodes("ns:vddDiagSpecifications/ns:VddDiagSpecification")
Set ODX = mess_node.SelectNodes("ns:VddArticle/ns:vddFiles/ns:VddFile[ns:typeFile='ODX 2.0.1']")
 
Vote positif 0 Vote négatif
VB: 
Sub LireVddDiagProjects()
    Dim xml As Object                ' MSXML2.DOMDocument60
    Dim nodes As Object              ' IXMLDOMNodeList
    Dim node As Object               ' IXMLDOMNode
    Dim mess_node As Object               ' IXMLDOMNode
    '--- Création du DOM (late binding)
    Set xml = CreateObject("MSXML2.DOMDocument.6.0")
    xml.async = False
    xml.validateOnParse = False
    '--- Charger le fichier XML
    If Not xml.Load("D:\Temp\P64_EUROPE_CONF_17_33 - light.xml") Then
        MsgBox "Erreur de chargement du XML"
        Exit Sub
    End If
    '--- Déclarer le namespace (méthode correcte MSXML)
    xml.SetProperty "SelectionNamespaces", _
        "xmlns:ns='http://example.com/vdddiag/projects'"   ' <-- adapte l’URL
    '--- Récupérer tous les nœuds OR
    Set nodes = xml.SelectNodes("//ns:VddEcu")
    If nodes.Length = 0 Then
        MsgBox "Aucun nœud trouvé. Vérifie le namespace."
        Exit Sub
    End If
    '--- Parcours des noeuds
    For Each node In nodes
        Debug.Print "Label VddEcu : ", node.SelectSingleNode("ns:label").Text
        Set mess_node = node.SelectSingleNode(".//ns:vddDiagSpecifications/ns:VddDiagSpecification/ns:VddArticle/ns:vddFiles/ns:VddFile[ns:typeFile='ODX 2.0.1']/ns:fileName")
        If Not mess_node Is Nothing Then Debug.Print "Fichier Diag : ", mess_node.Text
        Debug.Print "============================================="
    Next node
   ' MsgBox "Lecture terminée"
End Sub

.// = recherche récursive à partir de ce nœud, pas depuis la racine

Résultat :
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Résolu(e)
XL 2010 Navigation fichier XML
Réponses
14
Affichages
1 K
patricktoulon
H
  • Résolu(e)
Microsoft 365 Remplir un tableau récap à partir d'une base de données, avec 2 critères
Réponses
7
Affichages
1 K
dysorthographie
T
  • Résolu(e)
Microsoft 365 Transformer les données d'une colonne en fonction de 2 autres colonnes
Réponses
5
Affichages
814
Tidjyphenom
T
C
  • Question Question
XL 2016 Créer un fichier XML à partir d’Excel
Réponses
1
Affichages
616
cmdavid
C
A
  • Résolu(e)
XL 2016 Créer une liste verticale issue de plusieurs données à partir de la fonction Recherche V/H
Réponses
7
Affichages
778
arnoldbrice19
A
N
  • Question Question
XL 2019 Extraire des données texte WEB
Réponses
0
Affichages
759
nikodème
N
J
  • Résolu(e)
XL 2019 Recherche de données sur plusieurs fichier différents VBA
Réponses
3
Affichages
916
Hasco
R
  • Résolu(e)
Autres Copier des feuilles d'un classeur à partir de données identiques
Réponses
2
Affichages
1 K
Renaud22
R
3
  • Résolu(e)
XL 2016 Creer un tableau à partir d'une autre feuille de calcul avec plusieurs données dans différents onglets
Réponses
3
Affichages
2 K
_Thierry
D
  • Résolu(e)
XL 2019 Alimenter une combobox à partir des données d'une colonne et conditionnées par des données d'une autre colonne
Réponses
7
Affichages
4 K
DELHOMME
D
  • Question Question
XL 2016 Gérer une application à partir d'excel
2
Réponses
20
Affichages
2 K
Usine à gaz
M
  • Question Question
XL 2016 Croisement de données sur plusieurs années à partir de fichiers annuels
Réponses
9
Affichages
2 K
chris
D
  • Question Question
Autres Comment modifier les donnnées à partir d'un userform - J'y arrive pas
Réponses
4
Affichages
1 K
domduf33
D
  • Question Question
marco pour générer xml
2
Réponses
20
Affichages
2 K
grisan29
K
  • Question Question
Contenu illisible
Réponses
1
Affichages
2 K
CPk
C
R
  • Question Question
construire un tableau double dimension à partir de données dans un tableau double dimension
Réponses
1
Affichages
585
Dranreb
M
  • Question Question
XL 2010 recherche à partir d'une base de données
Réponses
2
Affichages
1 K
M.D
M
O
  • Question Question
Travail et mise en forme sur les données à l'aide de VBA
Réponses
0
Affichages
1 K
oxychene
O
R
  • Question Question
Copie de données à partir d'une liste déroulante
Réponses
4
Affichages
949
Renaud22
R
O
  • Question Question
Aide calcul quartile à partir d'une base de données
Réponses
3
Affichages
2 K
Denis132
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…