wolf5418 发表于 2021-5-9 01:53

求指教,此组命令有哪里不对?

这是一位热心大哥帮我写的代码,大哥估计睡了,麻烦大家帮我看看,运行出错,显示“运行时错误-2146232576(80131700)”,自动化错误,我按调试看了一下,“With cd”这里显示黄色,鼠标放上去显示对象变量或with cd块变量未设置。
Dim cd As New ChromeDriver, Ele As WebElement, Eles As WebElements
Dim loginUrl$, checkUrl$
rw = Cells(Rows.Count, 1).End(xlUp).Row
If rw = 1 Then Exit Sub
loginUrl = "https://www.yayaya.com/account/my_page_login"
checkUrl = "https://www.yayaya.com/account/change_rec"With cd
是不是开头Dim cd那里的cd未设置变量?如果是,那应该怎么修改?求大神指教

wolf5418 发表于 2021-5-9 10:36

求大神指教,谢谢
页: [1]
查看完整版本: 求指教,此组命令有哪里不对?