getElementsById-对象相关错误Excel VBA

Question

我正在研究一个项目，以从Realtor.com导入特定的房地产列表信息到Excel。该代码应访问Cell A1中清单的链接，并返回该物业在C1中构建的一年。我可以使用getElementsbyClassName进行某些搜索，但是使用（＃）。innertext变得不切实际。当我使用getElementsById时，我会收到错误91或错误424-这两者都涉及丢失的对象。我是VBA和编码的新手，因此，任何建议和一点耐心将不胜感激！

我现在正在使用的代码：

Sub GetYearBuilt()

Dim request As Object
Dim response As String
Dim html As New HTMLDocument
Dim website As String
Dim YearBuilt As Variant

'cell A1 contains a url to search
website = Range("A1")

Set request = CreateObject("MSXML2.XMLHTTP")
request.Open "Get", website, False
request.setRequestHeader "If-Modified-Since", "Sat, 1 Jan 2000 00:00:00 GMT"
request.send

response = StrConv(request.responseBody, vbUnicode)
html.body.innerHTML = response

'this line either causes error 91 - object variable or with block variable not set, or error 424 - object required
YearBuilt = html.getElementById("propertyDetailsSectionContentSubCon_BuiltIn")(0).innerText
    
'return address to cell C1
Range("C1") = YearBuilt

End Sub

HTML代码正在尝试提取：

<div class="propertyDetailsSectionContentSubCon" id="propertyDetailsSectionContentSubCon_BuiltIn">
      <div class="propertyDetailsSectionContentLabel">Built in</div>
      <div class="propertyDetailsSectionContentValue">1973</div>
</div>

虽然我可以使用类“ propertyDetailssectionContentValue”类，但整个网站中的该类都太多了。