| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hyperlink help
In column A there a bunch of cells
I want to extract all the hyperlinks associated with the cells in column A into Column B for example A1=axyfsk hyperlink=http://www.fasdfasdfasfsdfafd.com I want B1=hyperlink=http://www.fasdfasdfasfsdfafd.com |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hyperlink help
Hi Shani,
see http://www.mvps.org/dmcritchie/excel...perlinkaddress --- HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001] My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm Search Page: http://www.mvps.org/dmcritchie/excel/search.htm "Shani" wrote in message oups.com... In column A there a bunch of cells I want to extract all the hyperlinks associated with the cells in column A into Column B for example A1=axyfsk hyperlink=http://www.fasdfasdfasfsdfafd.com I want B1=hyperlink=http://www.fasdfasdfasfsdfafd.com |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hyperlink help
Hi Shani
Use this Dim hlink As Hyperlink For Each hlink In Columns("A").Hyperlinks hlink.Parent.Offset(0, 1).Value = hlink.Address Next -- Regards Ron de Bruin http://www.rondebruin.nl "Shani" wrote in message oups.com... In column A there a bunch of cells I want to extract all the hyperlinks associated with the cells in column A into Column B for example A1=axyfsk hyperlink=http://www.fasdfasdfasfsdfafd.com I want B1=hyperlink=http://www.fasdfasdfasfsdfafd.com |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hyperlink help
for each hlnk in Activesheet.hyperlinks
hlnk.parent.offset(0,1).Value = "'" & hlnk.Address Next -- Regards, Tom Ogilvy "Shani" wrote: In column A there a bunch of cells I want to extract all the hyperlinks associated with the cells in column A into Column B for example A1=axyfsk hyperlink=http://www.fasdfasdfasfsdfafd.com I want B1=hyperlink=http://www.fasdfasdfasfsdfafd.com |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hyperlink help
sub Extracthypelinksaddress()
Dim hlnk as Hyperlink for each hlnk in activesheet.hyperlinks hlnk.parent.offset(0,1).Value = "'" & hlnk.Address Next End Sub the most I could add is to come to your site and run the macro. -- Regards, Tom Ogilvy "Shani" wrote: In column A there a bunch of cells I want to extract all the hyperlinks associated with the cells in column A into Column B for example A1=axyfsk hyperlink=http://www.fasdfasdfasfsdfafd.com I want B1=hyperlink=http://www.fasdfasdfasfsdfafd.com |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Can't make hyperlink function work for hyperlink to website | Excel Worksheet Functions | |||
| Moving rows with Hyperlink doesn't move hyperlink address | Excel Discussion (Misc queries) | |||
| Intra-workbook hyperlink: macro/function to return to hyperlink ce | Excel Discussion (Misc queries) | |||
| Macro to Copy Hyperlink to another file as a HYPERLINK, not text... | Excel Programming | |||
| reading html when hyperlink address not hyperlink text diplayed | Excel Programming | |||
Hybrid Mode
