xml Attribute zuweisen

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Adrian.

    xml Attribute zuweisen

    Hallo Leute,

    ich versuche gerade, per VBA eine xml Datei zu erstellen (mit Verweis Microsoft XML, v6.0).
    Prinzipiell klappt das auch ganz gut, aber bei den Attributen habe ich Probleme.

    Visual Basic-Quellcode

    1. Dim block,knoten,subknoten, subknoten2 As MSXML2.IXMLDOMNode
    2. Dim attribut, attribut2 As MSXML2.IXMLDOMAttribute
    4. '...
    5. Set knoten = block.appendChild(.createNode(NODE_ELEMENT, "name", ""))
    6. Set attribut = .createAttribute("id")
    7. attribut.nodeValue = "Knotentext"
    8. knoten.setAttributeNode attribut ' bis hierher klappt alles wunderbar
    10. Set subknoten = knoten.appendChild(.createNode(NODE_ELEMENT, "unterknoten", ""))
    11. Set subknoten2 = subknoten.appendChild(.createNode(NODE_ELEMENT, "unterknoten2", ""))
    12. subknoten2.nodeTypedValue = "Knotentext"
    13. Set attribut = .createAttribute("id")
    14. attribut.Value ="Attributstext"
    15. subknoten2.setAttributeNode attribut ' hier kommt die Meldung, Rest funktioniert
    16. '...


    bei der letzten Zeile kommt die Kompilermeldung: "Methode oder Datenbankobjekt nicht gefunden".
    Dazu passt auch, dass "setAttributeNode" nicht in der Auswahlliste auftaucht.
    Aber wo ist der Unterschied zu knoten, beide sind doch gleich deklariert und erzeugt???
    Im Überwachungsfenster hat knoten den Typ
    Variant/Object/IXMLDOMElement und subknoten2 den Typ
    IXMLDOMNODE/IXMLDOMElement

    Hat jemand eine Idee, was hier passiert, und wie ich das Attribut an subknoten2 rankriege?
    Schonmal vielen Dank für Eure Zeit...

Facebook
Telefonspende