If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
How to convert a hyperlink to its target full-text URL
I have a large excel sheet where one column contains hyperlinks. They are all of the form:
Map_This and I'd like to substitute the underlying URL so that I can save this to a text file and put it in a database. Anyone have an idea? What I don't want to do is to do them all manually by right-clicking, editing the link and cutting and pasting the URL in the "display as". I tried making a macro, but I can't figure out how to make a macro that works in all columns as opposed to just a single cell. TIA. ----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeeds.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= East/West-Coast Server Farms - Total Privacy via Encryption =--- |
#2
|
|||
|
|||
Perhaps you can try this?
http://www.vbaexpress.com/kb/getarticle.php?kb_id=227 ******************* ~Anne Troy www.OfficeArticles.com www.MyExpertsOnline.com wrote in message ... I have a large excel sheet where one column contains hyperlinks. They are all of the form: Map_This and I'd like to substitute the underlying URL so that I can save this to a text file and put it in a database. Anyone have an idea? What I don't want to do is to do them all manually by right-clicking, editing the link and cutting and pasting the URL in the "display as". I tried making a macro, but I can't figure out how to make a macro that works in all columns as opposed to just a single cell. TIA. ----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeeds.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= East/West-Coast Server Farms - Total Privacy via Encryption =--- |
#3
|
|||
|
|||
Saved from a previous post:
One way to extract those URL's from a hyperlink created via Insert|Hyperlink is with a userdefinedfunction. Here's one that may help: Option Explicit Function GetURL(Rng As Range) As String Application.Volatile Set Rng = Rng(1) If Rng.Hyperlinks.Count = 0 Then GetURL = "" Else GetURL = Rng.Hyperlinks(1).Address End If End Function So if you had a hyperlink in A1, you could put =getURL(a1) in that adjacent cell. Be aware that if you change the hyperlink, then this formula cell won't change until your workbook calculates. If you're new to macros, you may want to read David McRitchie's intro at: http://www.mvps.org/dmcritchie/excel/getstarted.htm Short course: Open your workbook. Hit alt-f11 to get to the VBE (where macros/UDF's live) hit ctrl-R to view the project explorer Find your workbook. should look like: VBAProject (yourfilename.xls) right click on the project name Insert, then Module You should see the code window pop up on the right hand side Paste the code in there. Now go back to excel. Into a test cell and type: =getURL(a1) wrote: I have a large excel sheet where one column contains hyperlinks. They are all of the form: Map_This and I'd like to substitute the underlying URL so that I can save this to a text file and put it in a database. Anyone have an idea? What I don't want to do is to do them all manually by right-clicking, editing the link and cutting and pasting the URL in the "display as". I tried making a macro, but I can't figure out how to make a macro that works in all columns as opposed to just a single cell. TIA. ----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeeds.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= East/West-Coast Server Farms - Total Privacy via Encryption =--- -- Dave Peterson |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Linking text boxes | Volunteer Mom | Publisher | 7 | November 12th, 2008 01:29 AM |
Formulas dealing with text data | Bagia | Worksheet Functions | 6 | June 20th, 2005 10:29 PM |
Need Subforms? | AccessRookie | Using Forms | 7 | April 8th, 2005 09:30 AM |
Change font of part of text | John | Powerpoint | 7 | March 15th, 2005 10:10 AM |
Outline | Renee Hendershott | Page Layout | 2 | December 25th, 2004 02:49 PM |