How to get the data back from website to excel by using VBA without using excel built in function external link?

Since i search the website by input text

HTML Code:
<td>Charge 6/2015</td><td>$1,000.00</td>

Dim wb As Workbook
 Dim ws As Worksheet
 Dim a As Integer
 Dim ie As Object
Set wb = ThisWorkbook
Set ws = wb.Sheets("Supplier")
For a = 305 To 314
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
    ie.navigate ws.Cells(3, 1)
    While ie.Busy: DoEvents
    Wend
Do
Loop Until Not (ie.Busy)
ie.document.all("<td>Charge 6/2015").Value 
End Sub
How to get the the value next to the search?


I mean i search <td>Charge 6/201</td> and get $1,000.00 back to excel ?

Anyone know how to wirte the code?

Thank you very muhc!