Размер шрифта:

Как в Word быстро удалить из текста все гиперссылки?

Как в Word быстро удалить из текста все гиперссылки?

Для этого потребуется макрос: Sub DelLinks() Count = ActiveDocument.Hyperlinks If Count '= 1 Then For i = 1 To Count ActiveDocument.Hyperlinks(1).Delete Next End If End Sub Чтобы код был доступен во всех документах Word, его нужно сохранить для шаблона Обычный. Для этого в редакторе макросов на палитре Project откройте категорию NormalрMicrosoft Word Objects и дважды щелкните на элементе ThisDocument. В открывшемся окне наберите указанный код и сохраните изменения клавишами [Ctrl]+[S].

Добавить в:


Комментарии к этой заметке больше не принимаются.




Рейтинг популярности - на эти заметки чаще всего ссылаются:


март, 2009
пн вт ср чт пт сб вс
            1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31