Можно ли написать команду If... Then, чтобы ссылаться на ключевое слово/фразу в части внутреннего текста HTML.
Например, я хочу запустить команду "If... Then", которая найдет тег с частью внутреннего текста, включая фразу "Records Found". Только тег будет иметь эту фразу во внутреннем тексте, если тег существует. Если этот тег существует, я хочу, чтобы ячейка на моем листе отображала "Множественные записи",
Dim ErrLi As Object
Dim ErrObj As Object
Dim x As Integer
Set ErrLi = IE.Document.GetElementById("DivCenterTopArea").GetElementsByTagName("li")
If Not ErrLi Is Nothing Then
For x = 1 To ErrLi.Length - 1
If ErrObj.innertext = & "records found." Then
Range("Q" & (ActiveCell.Row)) = "Multiple Records Found"
End If
Next
End If
Использовать функцию instr
If instr(1, ErrObj.innertext, "records found.") > 0 Then
Range("Q" & (ActiveCell.Row)) = "Multiple Records Found"
End If