从网站中提取id的值为excel

Question

Good Nigth。

我尝试将下一个代码作为Excel函数，提取 id = LblNombre 的值，但是我在excel中出错

Function Registro(RTN As String)
   Dim IE As Object
   Dim Respuesta As String

   Set IE = CreateObject("InternetExplorer.Application")
    IE.Navigate "http://enlacertn.sar.gob.hn"
    IE.Visible = True
   While IE.busy
    DoEvents
   Wend
   IE.document.All.Item("txtCriterio").Value = RTN
   IE.document.All("btnBuscar").Click
   Application.Wait (Now + TimeValue("0:00:03"))

   Do Until IE.ReadyState = 4
    DoEvents
   Loop
   Respuesta = IE.document.getElementById("LblNombre").innertext
   Registro = Respuesta
  IE.Quit
End Function

这些是屏幕截图

Excel Error

Before Query

After Query

Web code

我需要帮助，因为这个功能可以帮助我改善工作

谢谢，