mikkelle пишет:К закладке нужно переходить, что бы в требуемое место вставить требуемые данные.
Можно обойтись без перехода. Функция, меняющая текст указанной закладки указанного документа. Если удалось изменить, возвращает True, если не удалось — False:
Function ChangeBookmarkText(Doc As Document, Name As String, Text As String) As Boolean
If Not Doc.Bookmarks.Exists(Name) Then
ChangeBookmarkText = False
Exit Function
End If
Dim orng As Range
Set orng = Doc.Bookmarks(Name).Range
orng.Text = Text
Doc.Bookmarks.Add Name, orng
ChangeBookmarkText = True
End Function
Использование (замена текста в закладке FF активного документа)
If Not ChangeBookmarkText (ActiveDocument, "FF", "Новый текст закладки") Then
MsgBox "Не удалось изменить текст закладки"
End If
Лучше день потерять — потом за пять минут долететь!