Listado de los hipervínculos de un documento

hola,

necesito sacar una lista con todos los hipervinculos que tiene un
documento Word, que incluya el texto y la URL de cada uno de ellos...

A falta de mas detalles..., puedes probar algo como lo siguiente >>

'[]

Sub Url_and_texto()
Dim x As Hyperlink
For Each x In ActiveDocument.Hyperlinks
Selection.TypeText x.Name & " - " & x.Range _
& vbCrLf
Next
End Sub

'[]


Comentanos...!


Saludos
Monica


www.fermu.com
www.teladearana.es