You do not have permission to delete messages in this group
Copy link
Report message
Show original message
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to
Hello. I have one document where there is many words as hyperlinks. I need to replace these words on the direct links (e.g., instead of Google must be the link http://google.com). How I can do it? Thanks.
Helmut Weber
unread,
Jan 21, 2008, 5:15:02 AM1/21/08
Delete
You do not have permission to delete messages in this group
Copy link
Report message
Show original message
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to
Hi Avkokin,
Try:
Sub Test3991() Dim oHpl As Hyperlink For Each oHpl In ActiveDocument.Hyperlinks oHpl.TextToDisplay = oHpl.Address Next End Sub
-- Greetings from Bavaria, Germany Helmut Weber, MVP WordVBA Word 2002, Windows 2000 (german versions)