Thread: Add hyperlink to each http(s) string
View Single Post
 
Old 10-03-2023, 02:27 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
  
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,176
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default
You could also try
Code:
Sub Macro1()
  Options.AutoFormatAsYouTypeReplaceHyperlinks = True
  ActiveDocument.Range.AutoFormat
End Sub
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote