Access Denied in excel VBA when using web.send -


i checking stock price in excel macro using following code. however, received during "web.send"

run-time error '-2147024891 (80070005)':
access denied

since fine until yesterday , there no other information cannot figure out reason. can check this? thank much.

sub checkindex()  sheets("temp").range("a:a").clear      url = "https://www.google.com.hk/finance?q=indexhangseng:hsi"     set web = createobject("microsoft.xmlhttp")     web.open "get", url, false     web.send     webdata = split(web.responsetext, vblf)       j = 0 ubound(webdata)          thisworkbook.worksheets("temp").cells(j + 1, 1).numberformatlocal = "@"           thisworkbook.worksheets("temp").cells(j + 1, 1).value = webdata(j)     next j  end sub 


Comments

Popular posts from this blog

ios - MKAnnotationView layer is not of expected type: MKLayer -

ZeroMQ on Windows, with Qt Creator -

unity3d - Unity SceneManager.LoadScene quits application -