VBA выберите onclick, если условие выполнено - PullRequest
0 голосов
/ 04 марта 2020
<tr> align = "center" onmouseover = "this.style.cursor='pointer';" onclick = "__doPostBack('ctl01$PortalContent$GridOrderControl1$CILGridViewOrder','Select$0')">
<td rowSpan = "1" colSpan = "1">new</td>
<td rowSpan = "1" colSpan = "1">Text2</td>
<td rowSpan = "1" colSpan = "1">Text3</td>
<td rowSpan = "1" colSpan = "1">Text4</td>
<td rowSpan = "1" colSpan = "1">Text5</td>

Привет, мне нужна помощь по вышеуказанному. Что я хочу: 1) проверить, если первая строка новая и «текст 4» не появлялся раньше 2) если вышеуказанное условие выполнено, нажмите / выберите на щелчке 3) выберите $ 0 - первая строка в таблице, там всего 10 строк, я хочу проверить все строки, затем щелкнуть и сделать что-то еще, когда условия будут выполнены о том, как это сделать?

Что у меня пока что

Set Data = IE.Document.getElementsByTagName("tbody")(6).getElementsByTagName("tr")
x = 1
y = 1

For Each eleCollection in Data
  If Instr(1, eleCollection.innerHTML, "Select$0") >0 Then
    For Each ele in eleCollection.getElementsByTagName("td")
       ws.Cells(x,y).Value = ele.innerText
       y = y + 1
       x = x + 1
    Next
  End If
Next elemCollection
...