Saving hyperlinked files (HTTPS) to a different folder

[skinnerq]

I have a spread sheet that has a colunm of hyperlinked files that I have filtered. I now want to save the hyperlink files I have filtered into a specific folder but It is taking very long because I need to select the hyperlink then the pdf opens, then I save the pdf to a folder and then go to the next hyperlink just below and continue.

Please note that I am copying hyperlinked files from an HTTPs webserver.

I there a faster way to do this. PLEASE HELP!!!

 

[Ralajer]

While this could be solved with VBA I would recommend you use a download manager. I use Free Download Manager (FDM) but likely any of the many download manger programs would fit your needs, FDM just happens to be the one I started using.

The process when I need to download a list of files from a web server from a list I generated in Excel I just copy the cells and in FDM I just press ctrl+shift+V and select the target folder and the downloading begins.

 

[skinnerq]

Thanks alot, this is what I need, but I can only downland one at a time. I did what you said in the message but that way didnt work. Thoughts?

 

[Ralajer]

Not sure why it didn't work for you. I double checked after you replied and it worked for me. Try it again using the menu. (Copy Cells, in FDM, File -> Import -> Import List of URLs from Clipboard). If that still doesn't work you may just be copying the display text. Double check that you are coping what you think you are copying by pasting into notepad. It should be something along the lines of

• http://www.example.com/doc1.pdf
• http://www.example.com/doc2.pdf
• http://www.example.com/doc3.pdf

If it is the display text there are ways around that.

 

[skinnerq]

ok now when I do that the "choose group" dailog box comes up. Then what do I do?

 

[Ralajer]

Next to the combobox is a button press that to add a group. Give it name, assign it to a parent group and set default folder. Pressing ok will take you back to the previous dialog, select the group you just created and press ok.

 

[skinnerq]

I do that but nothing happens??

 

[Ralajer]

If you open notepad and paste do the copied cells paste as URLs?

 

[skinnerq]

No, this is what comes up in note pad.

223-162-RML-0005-01_0.PDF
223-162-RML-0005-04_0.PDF
223-162-RML-0005-05_0.PDF
223-162-RML-0005-06_0.PDF
223-410-RML-0007-01_0.PDF
223-410-RML-0007-02_0.PDF
223-410-RML-0007-11_0.PDF
223-410-RML-0007-12_0.PDF
223-410-RML-0007-13_0.PDF
223-410-RML-0007-14_0.PDF

It is a copy of the actual names that are hypelinked in the cells.

Thoughts?

 

[Ralajer]

This code will extract the hyperlinks' path of the selected cells into the column to the right. Not sure if you are familiar with VBA. If not let me know I will explain how to run it.

Sub LinkGet()
    Dim hl As Hyperlink
    Dim offset As Integer
    offset = 1
    For Each hl In Selection.Hyperlinks
        Cells(hl.Parent.Row, hl.Parent.Column + offset).Value = hl.Address
    Next hl
End Sub