VBA代码根据特定条件分析HTML表

Question

因此，我需要屏蔽网站上的数据并将其返回到电子表格，如果费用金额匹配，则日期是表格中的最新日期。如果表中只有一行，那么宏会相应地拉动它。所以大多数代码都很好，我连接到网站，有效地拉动所有内容。我正在努力的地方是让两个金额匹配的逻辑工作，以及HTML表格中最新的日期。

我想我的问题是如何在Item（5）中循环该表的列并指定它以选择最近的日期，同时设置该值以使其仅找到等于收费金额的值。我只想要一对一的比赛。我是新手，所以如果有人想帮助我，我会非常感激。

Set IHEC = iHTMLDoc.getElementsByTagName("TR")
If IHEC.Length > 2 Then
For index = 0 to IHEC.Length - 1
Set IHEC_TD = IHEC.Item(index).getElementsByTagName("TD")
Do Until IHEC.Length <2 Or index = IHEC.Length - 1
If IHEC.TD.Item(3).innerText = myBilledAmount Then
myItem1 = IHEC_TDItem(0).innerText
myItem2 = IHEC_TDItem(1).innerText
myItem3 = IHEC_TDItem(2).innerText
myItem4 = IHEC_TDItem(3).innerText
myItem5 = IHEC_TDItem(4).innerText
myItem6 = IHEC_TDItem(5).innerText
myItem7 = IHEC_TDItem(6).innerText
myItem8 = IHEC_TDItem(7).innerText
myItem9 = IHEC_TDItem(8).innerText
End If
End If
Loop
Next Index