在vba中获取跨度数据图标中的文本

在vba中获取跨度数据图标中的文本,vba,selenium,ms-access,xpath,web-scraping,Vba,Selenium,Ms Access,Xpath,Web Scraping,我希望在此代码中获取文本“msg dblcheck”,并将其插入MSaccess表中: 你是说: .FindElementByCss("._32uRw span").Attribute("data-icon") 我不知道在这之前你有多少个类名。上面的内容将通过该类名与下面的范围匹配 您可以执行FindElementsByCSS,并索引到返回的webElements集合中,例如.FindElementsByCSS(“.u 32uRw span”)(1).属性(“数据图标”) 有了以上内容,您不

我希望在此代码中获取文本“msg dblcheck”,并将其插入MSaccess表中:


你是说:

.FindElementByCss("._32uRw span").Attribute("data-icon")
我不知道在这之前你有多少个类名。上面的内容将通过该类名与下面的范围匹配

您可以执行
FindElementsByCSS
,并索引到返回的
webElements
集合中,例如
.FindElementsByCSS(“.u 32uRw span”)(1).属性(“数据图标”)

有了以上内容,您不需要在末尾添加
.Text
。这将返回
msg dblcheck

对于具有此属性的最后一个元素:

Dim numElements As Long, lastElement As WebElement
numElements = bot.FindElementsByCss("[data-icon='msg-dblcheck']").Count
Set lastElement = bot.FindElementsByCss("[data-icon='msg-dblcheck']")(numElements-1)

要在将文本
[data icon='msg-dblcheck']
更改为
\u 32uRw[data icon='msg-dblcheck']
之前包含元素的类名,您的意思是:

.FindElementByCss("._32uRw span").Attribute("data-icon")
我不知道在这之前你有多少个类名。上面的内容将通过该类名与下面的范围匹配

您可以执行
FindElementsByCSS
,并索引到返回的
webElements
集合中,例如
.FindElementsByCSS(“.u 32uRw span”)(1).属性(“数据图标”)

有了以上内容,您不需要在末尾添加
.Text
。这将返回
msg dblcheck

对于具有此属性的最后一个元素:

Dim numElements As Long, lastElement As WebElement
numElements = bot.FindElementsByCss("[data-icon='msg-dblcheck']").Count
Set lastElement = bot.FindElementsByCss("[data-icon='msg-dblcheck']")(numElements-1)

为了在将文本
[data icon='msg-dblcheck']
更改为
\u 32uRw[data icon='msg-dblcheck']
之前包含元素的类名,我设法用您给出的答案的第一部分解决了我的问题。不幸的是,当我插入该计数以获取最后一个元素时,函数停止响应。谢谢。很抱歉,我检查了其他测试,不幸的是我没有解决。我将指出一个错误,我将在MOMEINTERROR运行时看到这个错误。。。。。时间间隔中不包括索引。所需的非负值且小于集合的大小。参数名称:indexon Set lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements)Set lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements)我注意到计数工作正常(找到的数字在调试中突出显示)奇数。尝试设置lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements-1)作为一个实验。我用您给出的答案的第一部分解决了我的问题。不幸的是,当我插入该计数以获取最后一个元素时,函数停止响应。谢谢。很抱歉,我检查了其他测试,不幸的是我没有解决。我将指出一个错误,我将在MOMEINTERROR运行时看到这个错误。。。。。时间间隔中不包括索引。所需的非负值且小于集合的大小。参数名称:indexon Set lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements)Set lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements)我注意到计数工作正常(找到的数字在调试中突出显示)奇数。尝试设置lastElement=bot.FindElementsByCss(“[data icon='msg-dblcheck']”)(numElements-1)作为实验。