XML en VBA - Au secours

Résolu

cs_manu00 Messages postés 93 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 25 octobre 2006 - 6 juil. 2006 à 18:11
jerome_ Messages postés 10 Date d'inscription mercredi 11 février 2004 Statut Membre Dernière intervention 13 août 2010 - 21 juil. 2006 à 14:57

Bonjour les amis,

J'ai un très gros soucis, et j'ai absoluement besoin de vous. Je dois faire pour demain matin un petit programme en VBA.
Mais dans ce programme, je dois importer le contenu d'un fichier XML dans des combobox.

Le fichier XML est formé comme ceci:
<Location>
    <Cities>
        <City Id="4913" UniqId="0032ddf25dcb37c45b3d3fbb3fc5570a">
            <Descriptions>
                <Description Language="FR"><![CDATA[Aabenraa]]></Description>
                <Description Language="EN"><![CDATA[Aabenraa]]></Description>
            </Descriptions>
            <Country Code="DK"/>
        </City>
        <City id="5" UniqId="c348b886c6e6232063d7e351865cf95b">
            <Descriptions>
                <Description Language="FR"><![CDATA[Aachen]]></Description>
                <Description Language="EN"><![CDATA[Aachen]]></Description>
            </Descriptions>
            <Country Code="DE"/>
        </City>
    </Cities>
    <Countries>
        <Country id="3" Code="AF" UniqId="9798b2ac24df372a20d220ba17e7cae2">
            <Descriptions>
                <Description Language="FR"><![CDATA[Afghanistan]]></Description>
                <Description Language="EN"><![CDATA[Afghanistan]]></Description>
            </Descriptions>
        </Country>
        <Country id="6" Code="AL" UniqId="6f59537d22c81577b410b06c73a0065e">
            <Descriptions>
                <Description Language="FR"><![CDATA[Albania]]></Description>
                <Description Language="EN"><![CDATA[Albania]]></Description>
            </Descriptions>
        </Country>
    </Countries>
    <Locations>
        <Location id="1" UniqId="e5c85974d421dd2d2f3b05e82c384ab2">
            <Descriptions>
                <Description Language="FR"><![CDATA[Lioni]]></Description>
                <Description Language="EN"><![CDATA[moupo]]></Description>
            </Descriptions>
        <City Code="2016"/>
        <Country Code="ZA"/>
        </Location>
        <Location ID="2" UniqId="3d6cab15e36b8e90fab40e2a3cc4814f">
            <Descriptions>
                <Description Language="FR"><![CDATA[Jiang]]></Description>
                <Description Language="EN"><![CDATA[Jiang]]></Description>
            </Descriptions>
            <City Code="2016"/>
            <Country Code="ZA"/>
        </Location>
</Locations>
</Location>

Et je dois parcourir toute les infos et stocker dans mon combobox mutli colonne toutes les infos.
J'utilise MSXML2.DOMDocument mais je n'y arrive vraiment pas car je ne sais pas bien l'utiliser ni comment recuperer les valeurs des attributs, et les descriptions qui se trouvent dans <Descriptions>...etc etc.

Quelqu'un pourrait il m'aider à m'en sortir ??

Merci d'avance

A voir également:

3 réponses

Réponse 1 / 3

cs_manu00 Messages postés 93 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 25 octobre 2006
7 juil. 2006 à 08:35

J'e m'en suis sorti finalement :-)

Merci quand meme !

Réponse 2 / 3

mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
8 juil. 2006 à 07:50

Salut,

Valide ta réponse alors stp.

Merci (ça nous évitera d'ouvrir ton Topic) ;-)

@++

--Mortalino--
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement !

Réponse 3 / 3

jerome_ Messages postés 10 Date d'inscription mercredi 11 février 2004 Statut Membre Dernière intervention 13 août 2010
21 juil. 2006 à 14:57

Bha j'aimerais bien voir ta solution :)

Je cherche justement à récupérer le contenu d'un fichier xml grâce à une maccro vba, et je galère la :(

Donc si tu pouvais m'aider avec ton exemple ca serait cool ;)

Discussions similaires

Comment fonctionne la fonction FormulaR1C1

fonction modulo en VBA

modifier cdata dans un xml

Dernière cellule non vide d'une colonne

A quoi sert la fonction Set ?

Votre réponse

Discussions similaires