错误424

nancy4929 · 发表于 2018-7-31 11:44

Sub taobao()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
      IE.Visible = True
      IE.Navigate ("https://s.taobao.com//")
      Do Until IE.readyState = 4
         DoEvents
      Loop
      IE.document.getElementsByName("q").Item(0).Value = Range("j2").Value
End Sub

各位大大，我用VBA来打开淘宝，用了上面的语句，然后在我电脑上是可以打开的，在我同事电脑上运行却一直出现错误424，请问这是什么问题呢？需要怎么解决？谢谢

nancy4929 · 发表于 2018-7-31 13:59

自己捞一捞，求大神指导！

322344 · 发表于 2018-7-31 14:58

nancy4929 发表于 2018-7-31 13:59
自己捞一捞，求大神指导！

你可能要在他电脑上试，看是什么原因，我电脑上试没问题的，你看他电脑ie能用不。

nancy4929 · 发表于 2018-7-31 15:06

322344 发表于 2018-7-31 14:58
你可能要在他电脑上试，看是什么原因，我电脑上试没问题的，你看他电脑ie能用不。

我有查了下资料，说是IE不是默认浏览器，但是我自己本身电脑上用的也不是IE，是360浏览器，可我运行得了。会不会是excel版本的问题？

322344 · 发表于 2018-7-31 15:14

nancy4929 发表于 2018-7-31 15:06
我有查了下资料，说是IE不是默认浏览器，但是我自己本身电脑上用的也不是IE，是360浏览器，可我运行得了 ...

我用的四excel2010，不知道你用的哪个版本，我ie也不是默认浏览器

nancy4929 · 发表于 2018-7-31 15:25

322344 发表于 2018-7-31 15:14
我用的四excel2010，不知道你用的哪个版本，我ie也不是默认浏览器

我也是10版的，同事的不是

322344 · 发表于 2018-7-31 15:27

nancy4929 发表于 2018-7-31 15:25
我也是10版的，同事的不是

那你可以用它的版本做个，或者叫他用10版本

nancy4929 · 发表于 2018-7-31 15:45

322344 发表于 2018-7-31 15:27
那你可以用它的版本做个，或者叫他用10版本

所以不同版本的EXCEL的VBA语句有可能不同？

322344 · 发表于 2018-7-31 17:57

nancy4929 发表于 2018-7-31 15:45
所以不同版本的EXCEL的VBA语句有可能不同？

应该不会吧，一个地方出来的，你叫他设置ie为默认浏览器试试，不是要弹出ie淘宝页面吗？有没有弹出来

		自动登录	找回密码
密码			免费注册

[求助] 错误424