Download multiple files from different URLs / links

abhay_547 · #1 (**permalink**) 09-11-10, 12:14

Hi All,

I have below macro which is used to download single file from internet. It works fine but I want to download multiple files from different links. I have created a userform with a list box which shows all URLs / links and has download button. I need the help to use the below macro in my attached file which will allow me to download files.

Code:

Sub downloadfiles()
'Need to reference to Microsoft Internet Controls
    Dim URL As String
    'URL = Worksheets("References & Resources").Range("URLMSL")
    URL = "http://www.xyz.com/abc.zip" 'for TEST
    Dim IE As Object
    Set IE = CreateObject("internetexplorer.application")
    IE.Visible = True
    IE.Navigate URL
    Do While IE.ReadyState <> 4
        DoEvents
    Loop
    SendKeys "%S"
    IE.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT    'SaveAs
End Sub

There is one more issue with the above mentioned macro that it asks for a confirmation to user before downloading the file .i.e. do he want to open or save or cancel the download. Which I want to suppress.

Thanks a lot for your help in advance.

SledgeHammer · #2 (**permalink**) 10-05-10, 03:02

What's the intended use of this Excel file ?

Would you please be more specific ?

Internet Services

Web Development

Digital Marketing

Consumer Tech