Run this code --

Sub Macro1

Dim pLink As Word.Hyperlink

For Each pLink In ActiveDocument.Hyperlinks
ActiveDocument.Content.InsertAfter pLink.Address & vbCr
Next

End Sub


This will insert a list of all the hyperlinks at the end of the document.
Then you can cut and paste from there.



"true" wrote in message
...
I have a client-supplied document of over fifty pages with many, many
links.
I need to place these links into a design (Quark) layout. Can I export all
of
the links in the document into a simple listing rather than picking
through
all the copy paragraph by paragraph to copy and paste links?