![]() |
|
|
|
#1
|
||||
|
||||
|
It would have been helpful had you said you wanted to do that. Assuming these domain names are only in the hyperlinks, try: Code:
Sub Demo()
Dim hLnk As Hyperlink
For Each hLnk In ActiveSheet.Hyperlinks
With hLnk
.Address = Replace(.Address, "domain.com", "xyzaddress.ca")
.TextToDisplay = .Address
End With
Next
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Change Text To Hyperlink | abraxis | Outlook | 0 | 10-09-2014 08:24 AM |
| Add link to email address that hides the actual address or makes it inaccessible to online bots | richiebabes | Word | 1 | 09-03-2014 03:22 PM |
Delete specific mass text on document
|
JadeRisley | Word | 4 | 07-17-2013 11:11 PM |
How do you mass change "Text to Display" on hyperlinks
|
lvillanueva5 | Mail Merge | 1 | 09-10-2012 05:32 PM |
| Can't change period when adjusting actual time in Web Access | chip_saffire | Project | 0 | 10-04-2011 12:05 AM |