Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Batch create hyperl formula from hyperl value
Good day; Excel 2003 - Inserted-Hyperlink paths problems. 1. Many workbooks with multi worksheets with 4,000+ 'relative' hyperlinks, created with Insert-Hyperlink... in Excel2000 and 2003. Same relative network paths problems as in so many other posts. |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Batch create hyperl formula from hyperl value
You can use a User defined function to retrieve the link.
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) Then if you get the answer you expected, you could change the formula to: =hyperlink(geturl(a1)) or maybe... =if(geturl(a1)="","",hyperlink(geturl(a1)) Electro911 wrote: Good day; Excel 2003 - Inserted-Hyperlink paths problems. 1. Many workbooks with multi worksheets with 4,000+ 'relative' hyperlinks, created with Insert-Hyperlink... in Excel2000 and 2003. Same relative network paths problems as in so many other posts. -- Dave Peterson |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Batch create hyperl formula from hyperl value
Appreciate the quick course, exactly what the doctor ordered to start me on the right foot. Eager to see how much tweaking it will take - French OS + Frencjh Office. =Hyperlink is actually '=Lien_Hypertexte' etc... I'll combine your snippet with others in http://www.mvps.org/dmcritchie/excel/buildtoc.htm etc..., and see if I can automate the whole thing... Probably will post the code when done, if that doesn't step on anyone's toes. Thanks again. -- Electro911 ------------------------------------------------------------------------ Electro911's Profile: http://www.excelforum.com/member.php...o&userid=31949 View this thread: http://www.excelforum.com/showthread...hreadid=516768 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
create reference formula that looks through all sheets for matchin | Excel Worksheet Functions | |||
How do I create a 26 'tier' IF formula? | Excel Discussion (Misc queries) | |||
How can I create a formula for Salutation | Excel Discussion (Misc queries) | |||
Create Formula for calculating Little League Age... | Excel Worksheet Functions | |||
How to create specific formula | Excel Worksheet Functions |