VBA对于已经连接opned IE窗口

Question

我试图连接到已经打开的IE窗口，但我在2号线的一些问题

Run time error 429 ActiveX Component can't create object

我还添加引用仍然不能够访问IE窗口。以下是代码。

Sub A() 
    Set objShell = CreateObject("Shell.Application") 
    IE_count = objShell.Windows.Count 
    For x = 0 To (IE_count - 1) 
    my_url = objShell.Windows(x).Document.Location 
    my_title = objShell.Windows(x).Document.Title 

    if my_title Like "Put your webpage title here" & "*" Then 
     Set ie = objShell.Windows(x) 
     Exit For 
    Else 
    End If 
    Next 
End Sub 

Answer 1

两件事情 - 在你的代码

1. 申报 '即'。

2. IE_Count

   IE_count = objShell.Windows.Count应该是IE_count = objShell.Windows().Count。请参阅 - https://msdn.microsoft.com/en-us/library/windows/desktop/bb773969(v=vs.85).aspx

希望纠正这些会得到你的代码工作