Форумы HiProg.com - MS ACCESS, VBA, VB

ник: Гоблин
Нагло будет советовать в программерстве с моей стороны, но уж случай интересен. Смоделировал ситуевину и вот что получилось. (Записал макрос с установкой удалением закладки и ее созданием через несколько абзацев).
Sub Макрос1()
With ActiveDocument.Bookmarks
.Add Range:=Selection.Range, Name:="Закладочка"
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
Selection.TypeParagraph 'добавил абзац
Selection.TypeParagraph 'добавил абзац
ActiveDocument.Bookmarks("Закладочка").Delete
With ActiveDocument.Bookmarks
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
'Selection.EndKey Unit:=wdStory
With ActiveDocument.Bookmarks
.Add Range:=Selection.Range, Name:="Закладочка"
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
Selection.TypeText Text:= _
"Продолжаю ввод текста. Удалил и снова создал закладку в ново"
Selection.TypeText Text:="м месте."
End Sub

Код несколько сократил, но данный макрос работает с любого места страницы.
PS. Вообще в тему хоть попал?