Hi Team,
I want to download a file to my local worksheet from the site: https://www.bseindia.com/corporates/List_Scrips.aspx#
below is my code which I tried after doing some research.
challenge is, how to avoid the page resubmit (retry, cancel warning window)
secondly, I need to download the 5mb file and extract to the current localworksheet.
I want to download a file to my local worksheet from the site: https://www.bseindia.com/corporates/List_Scrips.aspx#
below is my code which I tried after doing some research.
challenge is, how to avoid the page resubmit (retry, cancel warning window)
secondly, I need to download the 5mb file and extract to the current localworksheet.
Code:
Sub bsecode()
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")
With ie
ie.Visible = True
'To open the website
.navigate "https://www.bseindia.com/corporates/List_Scrips.aspx#"
Do While ie.readyState <> 4
Sleep 1000
Loop
ie.document.getElementsByName("ctl00$ContentPlaceHolder1$btnSubmit")(0).Click
Sleep 1000
Do While ie.readyState <> 4
Sleep 1000
Loop
'To download the file
ie.navigate "javascript:__doPostBack('ctl00$ContentPlaceHolder1$lnkDownload','')"
'Do While .Busy: DoEvents: Loop
End With