Group: microsoft.public.word.vba.general
From: IdontWantSpam@nospam.net (Edward Thrashcort)
Date: Friday, November 16, 2007 5:47 PM
Subject: Re: Removing ALL hyperlinks

> Dim n As Long
> For n = 1 to ActiveDocument.Range.Hyperlinks.Count
> Activedocument.Range.Hyperlinks(1).Delete
> Next n

Should that be

For n = ActiveDocument.Range.Hyperlinks.Count Step -1
Activedocument.Range.Hyperlinks(n).Delete
Next n


Eddie

> *From:* "Jonathan West"
> *Date:* Fri, 3 Aug 2007 18:08:39 +0100
>
>
> "Bugsy" wrote in message
> news:%23YyOo%23e1HHA.3640@TK2MSFTNGP06.phx.gbl...
> >I have copied a document from the internet into a WORD document (WORD
> >2002). The copied document has hundreds of "hyperlinks" and "Permalinks"
> in >it.
> >
> > How can I remove ALL the links at one time (from the entire copied
> > document)? It would take forever to eliminate each one separately, I
> > think.
> >
> > I am using Windows XP Home edition.
> >
> > Thanks for any suggestions.
> >
> >
> >
>
> Dim n As Long
> For n = 1 to ActiveDocument.Range.Hyperlinks.Count
> Activedocument.Range.Hyperlinks(1).Delete
> Next n
>
>
> --
> Regards
> Jonathan West - Word MVP
> www.intelligentdocuments.co.uk
> Please reply to the newsgroup
>
>
>

Safety Articles | Usenet Groups | Usenet News | Bluegrass