VBA는 이미 IE 창을 열어 연결을 시도하고있어 IE 창

Question

을 opned,하지만 난 여전히도 참조를하지 추가 한

Run time error 429 ActiveX Component can't create object

2 라인에서 몇 가지 문제가있다 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.CountIE_count = objShell.Windows().Count해야한다. 참조하시기 바랍니다 - https://msdn.microsoft.com/en-us/library/windows/desktop/bb773969(v=vs.85).aspx

희망이 당신의 코드가

작업 얻을 것 수정