Thema Datum  Von Nutzer Rating
Antwort
09.01.2024 09:03:01 Jens
NotSolved
Blau XML-Datei auslesen
09.01.2024 11:11:34 Gast72537
NotSolved
09.01.2024 11:54:03 Jens
NotSolved
09.01.2024 20:44:09 Gast86104
NotSolved
10.01.2024 07:40:05 Jens
NotSolved
12.01.2024 16:13:47 Jens
NotSolved
15.01.2024 15:07:49 Jens
NotSolved
15.01.2024 15:56:09 Mase
NotSolved
16.01.2024 07:08:17 Jens
NotSolved
18.01.2024 09:06:42 Jens
NotSolved
18.01.2024 10:44:17 Mase
NotSolved
18.01.2024 12:06:58 Jens
NotSolved
18.01.2024 13:24:26 Mase
NotSolved
18.01.2024 12:43:44 Gast60342
NotSolved
18.01.2024 14:01:54 Jens
NotSolved

Ansicht des Beitrags:
Von:
Gast72537
Datum:
09.01.2024 11:11:34
Views:
93
Rating: Antwort:
  Ja
Thema:
XML-Datei auslesen

Kann sein, dass nodesAllNeeded auch als Variant deklariert werden muss, damit die For Each Schleife funktioniert. Bin gerade nicht sicher.

Sub XMLParser()
    Dim xDoc As New MSXML2.DOMDocument60
    Dim nodesAllNeeded As IXMLDOMElement
    Dim nodeOneNeeded As Variant
    
    Set xDoc = New MSXML2.DOMDocument60
    
    With xDoc
        .async = False
        .validateOnParse = True
        
        If xDoc.Load("C:\Test\Beispiel.xml") = False Then
            Debug.Print .parseError.reason, .parseError.ErrorCode
            Exit Sub
        End If
        
        Set node = xDoc.getElementsByTagName("renderedResult")
        For Each nodeOneNeeded In nodesAllNeeded
            'Ausgabe im Direktfenster
            'In der VBA IDE aufrufen mit Strg + G
            Debug.Print nodeOneNeeded.getAttribute("concentration")
        Next nodeOneNeeded
    End With
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.01.2024 09:03:01 Jens
NotSolved
Blau XML-Datei auslesen
09.01.2024 11:11:34 Gast72537
NotSolved
09.01.2024 11:54:03 Jens
NotSolved
09.01.2024 20:44:09 Gast86104
NotSolved
10.01.2024 07:40:05 Jens
NotSolved
12.01.2024 16:13:47 Jens
NotSolved
15.01.2024 15:07:49 Jens
NotSolved
15.01.2024 15:56:09 Mase
NotSolved
16.01.2024 07:08:17 Jens
NotSolved
18.01.2024 09:06:42 Jens
NotSolved
18.01.2024 10:44:17 Mase
NotSolved
18.01.2024 12:06:58 Jens
NotSolved
18.01.2024 13:24:26 Mase
NotSolved
18.01.2024 12:43:44 Gast60342
NotSolved
18.01.2024 14:01:54 Jens
NotSolved