Загрузка данных с html страницы, которая загружается не моментально

Sub GetInstagramStat()
    Dim sURL, html As String
    Dim oXMLHTTP As Object
    
    sURL = "http://stats.nba.com/league/player/#!/?LastNGames=15"
    Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
    With oXMLHTTP
        .Open "GET", sURL, False
        .send
        If .Status = 200 Then
            html = .responseText
            Debug.Print html
        End If
    End With
    Set oXMLHTTP = Nothing
End Sub

'---------------------------------------------------------------------------------------
' Procedure : getHtmlIE
' Author    : Fjedor/Farad@CyberForum/VsePro100@PE
' Date      : 03.02.2015
' Purpose   : a workaround to get an HTML from some ScriptIntensive sites
' Misc      : no warranties provided, feel free to use this script if properly attributed
'---------------------------------------------------------------------------------------
'
Function getHtmlIE(URL As String) As String
    Dim IE As Object
    Set IE = CreateObject("InternetExplorer.Application")
    
    With IE
        .Visible = False
        .Navigate URL
        Do: DoEvents: Loop Until .readyState = 4
    End With
    
    getHtmlIE = IE.Document.body.innerHTML
    
    IE.Quit
    Set IE = Nothing
End Function