Як в Word прибрати гіперпосилання

1. Видаляємо гіперпосилання вручну одну за однією
2. Прибираємо гіперпосилання за допомогою гарячих клавіш
3. Позбавляємося від посилань за допомогою скрипта Visual Basic

Наша взаимовыгодная связь https://banwar.org/

Привіт друзі. У цій статті я розповім вам про три способи прибрати гіперпосилання в документі Word: видалити їх вручну (одну за одною), використовуючи гарячі клавіші або використовуючи функціональністю Visual Basic. А що ж таке гіперпосилання? Гіперпосилання - це просто посилання на будь-яку частину документа або посилання, що веде на який-небудь сайт або сторінку в інтернеті. Тому, якщо вони вам в документі не потрібні, давайте навчимося їх видаляти.

Видаляємо гіперпосилання вручну одну за однією

1. Знаходимо гіпперсилку в документі Word

2. Натискаємо по ній правою кнопкою миші, в контекстному меню вибираємо «Видалити гіперпосилання»

Як бачите, ручний спосіб допомагає прибрати саме ті посилання в документі Word, які вам не потрібні. Добре, якщо у вас в документі їх 1-5 штук, а якщо більше і потрібно видалити їх все? Перейдемо до іншого способу.

Прибираємо гіперпосилання за допомогою гарячих клавіш

Деякі люди звикли користуватися гарячими клавішами в Word, це економить час і, часом, простіше, ніж натискати мишкою, щоб вибрати потрібну функцію. У цьому способі по боротьбі з гіперпосиланнями вам не потрібно буде думати про розмір документа і кількості посилань в ньому.

1. Виділимо весь текст в документі за допомогою комбінації CTRL + A

2. Видаляємо все гіперпосилання в документі Word, натиснувши CTRL + Shift + F9

Позбавляємося від посилань за допомогою скрипта Visual Basic

Ще один спосіб, який позбавить вас від рутини видалення.

1. Натискаємо ALT + F11, запуститися Microsoft Visual Basic

2. У верхньому меню вибираємо Insert (вставити)> Module (модуль) і вставляємо наступний нижче код

3. Коли код вставлений, запускаємо його виконання, натиснувши на кнопку F5

Код 1 (видаляє всі посилання в активному документі)

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, do not need anymore popping up Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False End Sub

Код 2 (видаляє всі гіперпосилання в усіх відкритих документах)

Sub KillTheHyperlinksInAllOpenDocuments () '--------------------------------------------- - 'Removes all hyperlinks from any open documents' Text to display is left intact '-------------------------------- --------------- Dim doc As Document Dim szOpenDocName As String 'Loop through all open documents: For Each doc In Application.Documents' Store the document name szOpenDocName = doc.Name 'Remove the hyperlinks from that document With Documents (szOpenDocName) 'Loop while there are hyperlinks afoot! While .Hyperlinks.Count> 0 .Hyperlinks (1) .Delete Wend End With 'Shut this off, do not need anymore popping up Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False Next doc End Sub

В текстовому редакторі MS Word є багато способів щодо виконання різних завдань. Якщо Вам подобається матеріал на моєму сайті - підписуйтесь на оновлення. Також свіжими випусками я ділюся в групах в ВК і ОК (посилання в меню).