Hallo zusammen,

welche Möglichkeiten gibt es unter VBA bestimmte Inhalte einer *.xml auszulesen und einer Zelle zuzuweisen?

Beispiel *xml:

<?xml version="1.0" encoding="Windows-1252"?>
<?xml-stylesheet type='text/xsl' href='Report.xsl'?>
<Protokoll xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" type="Report">
  <Report-Version>0.1</Report-Version>
  <Datum>22.10.2018</Datum>
  <Zeit>09:33:05</Zeit>
  <Dateiname>Report_22.10.2018_09.33.05.xml</Dateiname>
  <User>XXXXXXXXXXXXXXXXX</User>
  <ClientName>XXXXXXXXXXXXXX</ClientName>
  <Domain>XXXXXXXX</Domain>
  <Gruppe>Macro</Gruppe>
  <Erfassungsort>XXXXXXXXXXXXXXXXXX</Erfassungsort>
  <Fahrgestellnummer>XXXXXXXXXXXXXXXXXX</Fahrgestellnummer>
  <Kennzeichen>XXXXXXX</Kennzeichen>
  <HybridTyp />
  <MakroVersion />
  <WegStrecke>45</WegStrecke>
  <EinheitWegStrecke>km</EinheitWegStrecke>
  <WgNumber />
  <AU />
  <FzgBez />
  <DaisyNumber />
  <CopsNumber />
  <GateWayConfig></GateWayConfig>
  <Referenz></Referenz>
  <AM-Code></AM-Code>
  <Diagnosebloecke Anzahl="5">
    <Diagnoseblock Block="1">
      <SfdRole>Unknown</SfdRole>
      <SfdDuration>Unknown</SfdDuration>
      <Adresse>0001</Adresse>
      <Bezeichnung>Motorelektronik</Bezeichnung>
      <LogicalLink>LL_EnginContrModul1UDS</LogicalLink>
      <Datum>22.10.2018</Datum>
      <Zeit>09:32:22</Zeit>
      <NOCONTACT>0</NOCONTACT>
      <Protokoll>UdsOnCan</Protokoll>
      <Service>22</Service>
      <OdxFileIdentifier>EV_ECM30TFS0114N0907559A</OdxFileIdentifier>
      <OdxFileVersion>002005</OdxFileVersion>
      <HexConfig>MDG1  CB.06.043.0 022.00     </HexConfig>
      <MsgLetter>CZSE</MsgLetter>
      <SearchedOdxFileVersion>EV_ECM30TFS0114N0907559A_002005</SearchedOdxFileVersion>
      <SelectedOdxFileVersion>EV_ECM30TFS0114N0907559A_002005</SelectedOdxFileVersion>
      <ECU_Variante>EV_ECM30TFS0114N0907559A_002005</ECU_Variante>
      <Systembezeichnung>V6 3.0l TFSI </Systembezeichnung>
      <SWTeilenummer>4N0907559A </SWTeilenummer>
      <SWVersion>0003</SWVersion>
      <BootLoaderVersion>0001</BootLoaderVersion>
      <HWTeilenummer>06M907309F </HWTeilenummer>
      <HWVersion>H12</HWVersion>
      <CodierInfo>16</CodierInfo>
      <CodierInfoText>Lange Codierung</CodierInfoText>
      <Codierung>0A 2A 00 12 25 2E 05 0B 34 08 60 00 00 04 00 00 00 00 00 00 00 00 00 00</Codierung>
      <Codierung_Kurz></Codierung_Kurz>
      <Codierung_Lang>0A 2A 00 12 25 2E 05 0B 34 08 60 00 00 04 00 00 00 00 00 00 00 00 00 00</Codierung_Lang>
      <Parametrierbar>0</Parametrierbar>
      <ZdcName></ZdcName>
      <ZdcVersion></ZdcVersion>
      <PRIndex></PRIndex>
      <Flashbar>1</Flashbar>
      <Inkonsistenzbit>1</Inkonsistenzbit>
      <Schluesseltyp>nicht unterstuetzt</Schluesseltyp>
      <CodWerkstattcode>2391</CodWerkstattcode>
      <CodImporteursnummer>785</CodImporteursnummer>
      <CodBetriebsnummer>200</CodBetriebsnummer>
      <CalWerkstattcode>nicht vorgesehen</CalWerkstattcode>
      <CalImporteursnummer>nicht vorgesehen</CalImporteursnummer>
      <CalBetriebsnummer>nicht vorgesehen</CalBetriebsnummer>
      <ApplWerkstattcode>nicht vorgesehen</ApplWerkstattcode>
      <ApplImporteursnummer>nicht vorgesehen</ApplImporteursnummer>
      <ApplBetriebsnummer>nicht vorgesehen</ApplBetriebsnummer>
      <SubtNumber>1000</SubtNumber>
      <Seriennummer>nicht vorgesehen</Seriennummer>
      <Herstellung_Aenderungsstand>B7H12000</Herstellung_Aenderungsstand>
      <Produktionsdatum>02.10.18</Produktionsdatum>
      <Herstellerwerkskennzeichnung>BPG-810</Herstellerwerkskennzeichnung>
      <HerstellerpruefstandsNr>1370</HerstellerpruefstandsNr>
      <Laufende_HerstellerNr>0291</Laufende_HerstellerNr>
      <FAZITString>BPG-81002.10.1813700291</FAZITString>
      <Messwertebloecke Anzahl="1">
        <MWB Block="1">
          <Messwerteblock>Engine_oil_temperature_measured_value</Messwerteblock>
          <ServiceID>$1632</ServiceID>
          <Stelle Nr="1">
            <NrBez>Temp Cels SWORDMAS00194</NrBez>
            <Wert>50,4</Wert>
            <Einheit />
            <Text />
          </Stelle>
        </MWB>
      </Messwertebloecke>
    </Diagnoseblock>

Mich interessiert immer nur der Teil hier:

<Wert>50,4</Wert>

Habt ihr da Ideen?

Danke euch schonmal im Voraus :-)