Extract url's from Excel hyperlinks.

[SCRATCHER]

I have just spent Friday and today creating a table of 2138 webpage links, and now realize that i actually also need the URL's in a csv file. Can someone please help me with a way of extracting the URL's from the hyperlinks? Something that i could fill down instead of going through them all individually (noooo!) ?

 

[SCRATCHER]

It's ok i found something. Here it is just in case anyone needs it again

Sub ExtractHL()
    Dim HL As Hyperlink
    For Each HL In ActiveSheet.Hyperlinks
        HL.Range.Offset(0, 1).Value = HL.Address
    Next
End Sub