https://www.proz.com/forum/office_applications/326411-regex_or_macro_to_modify_hyperlinks.html&set_site_lang=ara
This site uses cookies. Some of these cookies are essential to the operation of the site, while others help to improve your experience by providing insights into how the site is being used. For more information, please see the ProZ.com privacy policy.
Cookie settings

منتديات تقنية » Office applications »
RegEx or macro to modify hyperlinks
ناشر الموضوع: DZiW (X)
DZiW (X)
DZiW (X)
أوكرانيا
أنجليزي إلى روسي
+ ...
Jun 24, 2018

Is there's a safe way in Word 2013 or WFC to change hyperlinks in the text like
XXXX
to
XXXX (some-hyperlink)
?

TY

[Edited at 2018-06-24 21:48 GMT]
 
Hans Lenting
Hans Lenting
هولندا
عضو (2006)
ألماني إلى هولندي
Safe Jun 25, 2018

DZiW wrote:

Is there's a safe way in Word 2013 or WFC to change hyperlinks in the text like
XXXX
to
XXXX (some-hyperlink)
?

TY

[Edited at 2018-06-24 21:48 GMT]


Are you referring to the conversion of a selected string or the conversion of a specified pattern (via a regex search)?
 
DZiW (X)
DZiW (X)
أوكرانيا
أنجليزي إلى روسي
+ ...
بادئ الموضوع
any Jun 25, 2018

Hello Hans,

It's about a conversion of the pattern: find all hyperlinks and replace with the text followed by hyperlinks in the brackets.

Why, RegEx seems quite versatile, but how?
 
Samuel Murray
Samuel Murray  Identity Verified
هولندا
Local time: 12:44
عضو (2006)
أنجليزي إلى أفيقاني
+ ...
Visually, maybe (but visually only) Jun 25, 2018

DZiW wrote:
Is there's a safe way...


The solution at answer #1 here gets you there halfway:
https://stackoverflow.com/questions/28335564/change-display-text-of-all-hyperlinks-in-document

Then, you can use Find/Replace to change the font of the text that you don't want to be a hyperlink, so that it doesn't *look* like a hyperlink. The part that you don't want to be a hyperlink will still be a hyperlink, but it won't look like one.

So, first use this macro:

Sub UpdateDocLinks()
Dim link As Hyperlink
For Each link In ActiveDocument.Hyperlinks
link.TextToDisplay = "{{{" & link.TextToDisplay & " (}}}" & link.Address & "{{{)}}}"
Next link
End Sub

And then use this find/replace with wildcards:
Find: (\{\{\{)(*)(\}\}\})
Replace: \2
and set the style of the Replace field as e.g. Default Paragraph Font.

----------------------------------------------

1.

two

2.

(then run macro)

3.

three

4.

four

5.

five



[Edited at 2018-06-25 12:29 GMT]
 
Hans Lenting
Hans Lenting
هولندا
عضو (2006)
ألماني إلى هولندي
— Jun 28, 2018

—

[Edited at 2018-06-28 21:56 GMT]
 
Samuel Murray
Samuel Murray  Identity Verified
هولندا
Local time: 12:44
عضو (2006)
أنجليزي إلى أفيقاني
+ ...
@Hans Jun 28, 2018

Hans Lenting wrote:
The macro in this thread (I've tested the macro with Word:mac 16.14.1) converts [a plaintext URL] to a hyperlink...


I thought Dziw wanted the opposite -- convert a hyperlink into text.
 
Hans Lenting
Hans Lenting
هولندا
عضو (2006)
ألماني إلى هولندي
You’re right Jun 28, 2018

Samuel Murray wrote:

Hans Lenting wrote:
The macro in this thread (I've tested the macro with Word:mac 16.14.1) converts [a plaintext URL] to a hyperlink...


I thought Dziw wanted the opposite -- convert a hyperlink into text.


You’re right.
 


To report site rules violations or get help, contact a site moderator:

مشرفو هذا المنتدى
Maya Gorgoshidze[Call to this topic]
Prachya Mruetusatorn[Call to this topic]

You can also contact site staff by submitting a support request »

RegEx or macro to modify hyperlinks


Forum rules
Help and orientation




Wordfast Pro
Translation Memory Software for Any Platform

Exclusive discount for ProZ.com users! Save over 13% when purchasing Wordfast Pro through ProZ.com. Wordfast is the world's #1 provider of platform-independent Translation Memory software. Consistently ranked the most user-friendly and highest value

Buy now! »
CafeTran Espresso
You've never met a CAT tool this clever!

Translate faster & easier, using a sophisticated CAT tool built by a translator / developer. Accept jobs from clients who use Trados, MemoQ, Wordfast & major CAT tools. Download and start using CafeTran Espresso -- for free

Buy now! »