Код VBA для загрузки данных с веб-сайта при определенных условиях.

Question

Мне нужно скачать цену на золото с этого сайта https://eximbank.com.vn/home/Static/Gold.aspx при условии 2 (дата и номер таблицы), как показано ниже. Этот код отлаживается с ошибкой времени выполнения 438 «Объект не поддерживает это свойство или метод», когда я выбираю дату и номер таблицы. Может ли кто-нибудь сказать мне, почему это так. Большое спасибо заранее!

  Sub Eximbank()
  Dim myIE As New InternetExplorer
  Dim myIEDoc As HTMLDocument
  myIE.Visible = False
  myIE.navigate "https://eximbank.com.vn/home/Static/Gold.aspx"
  Do While myIE.readyState <> 4 Or myIE.Busy
  DoEvents
  Loop
  Set myIEDoc = myIE.document

   ' Choose Date and Table number
  myIEDoc.getElementsByName("CalControl1$TextBox1").Value = "14/04/2020"
  myIEDoc.getElementsByName("ddlQuoteCount").Value = "19"
  myIEDoc.getElementsByName("ImageButton1").Click

 'Download data to active workbook
ActiveWorkbook.Sheets("Sheet1").Range("A1") = Now
ActiveWorkbook.Sheets("Sheet1").Range("A1")=myIEDoc.getElementsById("GoldRateRepeater_lblCSHBUYRT_0")(0).getElementsByTagName("td")(0).innerText
ActiveWorkbook.Sheets("Sheet1").Range("B1") = myIEDoc.getElementsById("GoldRateRepeater_lblCSHSELLRT_0")(0).getElementsByTagName("td")(1).innerText

 myIE.Quit
Set myIE = Nothing
End Sub