vba - Zoopla.co.uk からデータを取得する

Question

スプレッドシートのセルを見て、ページから Zoopla の「Z-Index」を返す関数を作成しようとしていますhttp://www.zoopla.co.uk/market/uk/。URL 内のmarketセクションは、たとえば BS8、BS6 などで変更される唯一のビットであり、これはスプレッドシート内で選択したセルから取得する必要があることに注意してください。次に、All、Detached、Semi、Terrace の平均物件価格である Z-Index 値を返す必要があります。

これは私がこれまでに作成したものです。

私が書いたコードは、セル A1 から郵便番号の平均プロパティ値を引き出していません。何か案は？

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = Range.("L:L").Row And _
   Target.Column = Range.("L:L").Column Then 
    Dim IE As New InternetExplorer
    IE.Visible = False
    IE.navigate "www.zoopla.co.uk/market/" & Range("A1/").Value
    Do
        DoEvents
    Loop Until IE.readyState = READYSTATE_COMPLETE
    Dim Doc As HTMLDocument
    Set Doc = IE.document
    Dim sSPAN As String
    sSPAN = Trim(Doc.getElementsByTagName("span")(1).innerText)
    sSPAN = Split(sSPAN, vbNewLine)(0)
    Range("O:O").Value = Split(sSPAN,", ")(0)
    Range("P:P").Value = Split(sSPAN,", ")(1)
End If
End Sub![Data needed][1]