Word (удаляем все гиперсылки)⁠⁠

Избавляемся от ссылок с помощью скрипта Visual Basic

Еще один способ, который избавит вас от рутины удаления.

1. Нажимаем ALT+F11, запуститься Microsoft Visual Basicкак в ворде удалить все гиперссылки сразу

2. В верхнем меню выбираем Insert (вставить) > Module (модуль) и вставляем следующий ниже код

3. Когда код вставлен, запускаем его выполнение, нажав на кнопку F5

(удаляет все ссылки в активном документе)

Sub KillTheHyperlinks()

' -----------------------------------------------

' Removes all hyperlinks from the document:

' Text to display is left intact

' -----------------------------------------------

With ThisDocument

' Loop while there are hyperlinks afoot!

While .Hyperlinks.Count > 0

.Hyperlinks(1).Delete

Wend

End With

' Shut this off, don't need anymore popping up

Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False

End Sub