Often my work involves processing web page data in excel sheets. This includes extracting the hyperlinks from cell contents. There is no formula for extracting hyperlinks though, you can right click on cell and choose “edit hyperlink” to see which address the cell is linking to. But that is a tedious process especially if you are planning on using the hyperlink for something.
Here is a handy user defined function in VBA for getting hyperlinks from a spreadsheet cell:
Function getURL(forThisCell As Range) As String
'VBA UDF for getting URLs from a cell if any
retVal = ""
If forThisCell.Hyperlinks(1).Address <> "" Then
retVal = forThisCell.Hyperlinks(1).Address
End If
getURL = retVal
End Function
Bonus tip: You can create hyperlink on a cell using “hyperlink()” spreadsheet function. The syntax is simple. =hyperlink("http://chandoo.org/wp","Pointy Haired Dilbert") will create a link in the cell to this blog.














4 Responses to “Office 2010 Contest Winners are here!!!”
I while ago I wrote a post on selecting a couple of names from a range via an UDF
I could have been handy.... especially because I didn't win.... lol
http://xlns.lamkamp.nl/?p=14
Sweet! I won! Thank you so much, Chandoo! I'm really speechless! I'll look out for an e-mail from you. Again, I really appreciate it, and I can't wait to fire it up!
Sincerely,
Tom "this one" 🙂
Thank You... Thank You... Thank You... 🙂
Hi,
Don't want to ruin your party.. 😉 but I noticed that when you sort the list A2:B11 (step 2), the RAND function re-calculates the numbers so that they are different and in mixed order again. I had to paste the whole area as values first and then sort to get it to work.
Wonder if the same happened to you because in your list at least Greg has a higher value than Tom 🙂