Удаляем все гиперссылки в документе MS Word с помощью скрипта
Иногда, при копировании материалов из браузера в документ MS Office кроме самого текста копируется еще и неявная информация, и часть слов оказывается гиперссылками.
Нижеприведенный скрипт позволяет удалить ВСЕ гиперссылки в документе.
Открываем редактор VBA (ALT+F11). В левой колонке в структуре проекта дважды кликаем по "ThisDocument".
В открывшееся окно ввода вставляем код и нажимаем F5:
Sub RemoveHyperlinks() While ActiveDocument.Hyperlinks.Count > 0 ActiveDocument.Hyperlinks(1).Delete Wend Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False End Sub |
После этого все гиперссылки в документе пропадут.
