excel - VBA 将编码从 Internetexplorer 更改为 XML HTTP 请求

Question

为了提高我的编码性能，我想将我的编码更改为 XML-http 请求。为了更好地理解，我在编码中通过 IE 注释掉了请求。

我的编码在调试时不会抛出任何错误。但是有了这个变体，我没有得到返回值。知道是什么问题吗？

    Const urlGrund As String = "https://"
    Dim urlVariabel As String
    Dim url As String
    'Dim browser As Object
   
   urlVariabel = ActiveSheet.Cells(aktuelleZeile, 1).Value
   url = urlGrund & urlVariabel
   
Old Version - working correct:
   'Set browser = CreateObject("internetexplorer.application")
   'browser.Visible = False
   'browser.navigate url
   'Do Until browser.readyState = 4: DoEvents: Loop
   'Application.Wait (Now + TimeSerial(0, 0, 2))

New Version - No return value:   
   Dim xmlpage As New MSXML2.XMLHTTP60
   Dim htmldoc As New HTMLDocument
   
   xmlpage.Open "GET", url, False
      
   Dim TagTitel As Object
   Set TagTitel = htmldoc.getElementsByClassName("font-semibold font-xl margin-bottom margin-top-m palm-font-l font-line-s")(0)
    
  If Not knotenTitel Is Nothing Then
    Titel = Trim(knotenTitel.innerText)
    
   Else
     Titel = Empty
   End If
   
   ActiveSheet.Cells(aktuelleZeile, 2).Value = Titel