eliminar todos los hipervínculos de un archivo de WORD

[Tioman]

En un solo paso eliminar todos los hipervínculos que se encuentren en un
archivo de WORD. Es decir, seleccionear todo el texto de todas las páginas y
eliminar todos los hipervínculos que se encuentren en el texto completo en un
solo paso. Y no tener que ir uno por uno.

[David]

Hola, Tioman.

Puedes eliminar todos los vínculos de un documento ejecutando el siguiente
código:

Sub QuitarHV()
Do
ActiveDocument.Hyperlinks(1).Delete
Loop Until ActiveDocument.Hyperlinks.Count = 0
End Sub

Espero que te sirva, si no, comentas...

Saludos.

- - - - - -

Post by Tioman
En un solo paso eliminar todos los hipervínculos que se encuentren en un
archivo de WORD. Es decir, seleccionear todo el texto de todas las páginas y
eliminar todos los hipervínculos que se encuentren en el texto completo en un
solo paso. Y no tener que ir uno por uno.