>

매크로를 작성했는데, 회사의 인트라넷 사이트를 긁어 Excel에서 시트를 채우는 데이터를 내 컴퓨터에서와 동일하게 작동하지만 동료와 매크로를 공유하면 Run-time error '-2147024891 (80070005)': Access is denied 가 발생합니다.  컴퓨터의 .send 줄에 오류가 있습니다.

모든 보안 설정, 매크로 사용, 참조 및 버전이 컴퓨터간에 동일하며, 모두 동일한 네트워크에 있고, 사이트에 액세스 할 수 있습니다.

사이트를 긁는 내 코드 부분은 다음과 같습니다.

Do While i < lastRowScrape + 1
    For j = 0 To 5
       Dim XMLPage As New MSXML2.XMLHTTP60
       Dim HTMLDoc As New MSHTML.HTMLDocument
       XMLPage.Open "GET", "[the site's url]", False
       XMLPage.send
       HTMLDoc.body.innerHTML = XMLPage.responseText
       'grab data
       siteData = Trim(HTMLDoc.getElementsByClassName("title_list")(j).innerText)
       'populate cells
       Cells(j + i, 2).Value = siteData(1)
       Cells(j + i, 4).Value = siteData(0)
       Cells(j + i, 6).Value = siteData(2)
       Cells(j + i, 5).Value = siteData(3)
    Next j
    i = i + 6
Loop


  • 이전 javascript - 앱 순서를 염두에두고 jquery ajax 요청이 끝나기 전에 다른 함수가 실행됩니다
  • 다음 자바 스크립트 파일 js에서 C # 변수에 액세스