Удаление текстов ссылок

[БуреВестник]

То есть в тексте есть ссылки 2-х видов: одни нужно удалить вместе с текстом, а у других удалить только признак Гиперссылки. Я правильно понял?
То есть надо удалять [edit] и [26], а остальные Гиперссылки превращать просто в текст?
Здесь не могу помочь, не знаю как условия создавать по поиску определённых символов.
Вот ещё вариант удаления Гиперссылок вместе с текстом:

Sub DeleteHypelinks()
Do While ActiveDocument.Hyperlinks.Count <> 0
    ActiveDocument.Hyperlinks(1).Range.Delete
Loop
End Sub

[PeterMinin]

Да, вы правильно поняли. Как условия создавать, я сделал (InStr), но вот просто с синтаксисом языка (begin-end) разобраться что-то пока не могу.

C End'ами примерно разобрался, осталось понять, почему Selection.MoveLeft Extend:=wdExtend не работает.