Hi everybody

I'm trying to find a way to copy data from a websites source code and paste it into excel.
The data looks like this:
<p>
<span class="highlight">Mitarbeiter:</span> 120 in Deutschland<br/>
<span style="display: "><span class="highlight">Umsatzklasse:</span> 10 - 50 Mio. Euro<br/></span>
<span style="display: none"><span class="highlight">Filialen:</span> <br/></span>
<span style="display: inline"><span class="highlight">Gegründet:</span> 1925</span>
</p
The value I'm looking for here would be "10 - 50 Mio. Euro".

This is the code I've written so far:


Sub Sample()    Dim IE As Object
    Set IE = CreateObject("InternetExplorer.Application")
    With IE
        .Visible = False
        .Navigate "https://www.wer-zu-wem.de/firma/steinel-normalien.html"
                 Do While .Busy And .readyState <> 4: DoEvents: Loop
         Application.Wait Now + TimeValue("0:00:06")
       Sheets("Dummy").Range("A1").Value = .document.body.outerHTML
        .Quit
    End With
End Sub
My approach here was to first copy the entire HTML source code to a spreadsheet and then continue with the InStr function.
However the solution above just gives me an [COLOR=rgba(0, 0, 0, 0.87)]excerpt from the full source code, which does not contain the data I'm looking for.

Does anyone know what exactly I'm doing wrong here?
Is there maybe a better approach, maybe to get the data I'm looking for directly from the website without the step inbetween?

Thank you guys in advance for any interest in my problem
[/COLOR][COLOR=rgba(0, 0, 0, 0.87)]

[/COLOR]