Edit hyperlinks
 

Hi!

I'm just about at wits end trying to find a method of editing 4000+
hyperlinks with variable addresses (eg c:\PO\888_Customer.xls to
c:\_PO\888_Customer.xls or c:\PO\889_customer.xls to c:\_PO\889_customer.xls.
Any suggestions would be enormously appreciated!
--
http://www.fyi.bz

Edit hyperlinks
 

Perhaps something like:

for each hlink in Activesheet.hyperlinks
sStr = hlink.Address
sStr = Replace(sStr,"\PO\","\_PO\")
hlink.Address = sStr
Next

--
Regards,
Tom Ogilvy

"Cadwan" wrote in message
...
Hi!

I'm just about at wits end trying to find a method of editing 4000+
hyperlinks with variable addresses (eg c:\PO\888_Customer.xls to
c:\_PO\888_Customer.xls or c:\PO\889_customer.xls to
c:\_PO\889_customer.xls.
Any suggestions would be enormously appreciated!
--
http://www.fyi.bz

Edit hyperlinks
 

Thanks Tom! That worked like a champ! I am very grateful!
--
http://www.fyi.bz


"Tom Ogilvy" wrote:

Perhaps something like:

for each hlink in Activesheet.hyperlinks
sStr = hlink.Address
sStr = Replace(sStr,"\PO\","\_PO\")
hlink.Address = sStr
Next

--
Regards,
Tom Ogilvy

"Cadwan" wrote in message
...
Hi!

I'm just about at wits end trying to find a method of editing 4000+
hyperlinks with variable addresses (eg c:\PO\888_Customer.xls to
c:\_PO\888_Customer.xls or c:\PO\889_customer.xls to
c:\_PO\889_customer.xls.
Any suggestions would be enormously appreciated!
--
http://www.fyi.bz