переход между заранее определенными закладками

[Окоча Юра]

Всем доброго дня! У меня в документе есть например такие закладки: датаНаписання, НомерДокумента, Висновок. Можно ли создать макрос чтобы нажав один раз я попал на закладку ДатаНаписання, нажав еще раз перешел на закладку НомерЕкспертизи, нажав еще раз на закладку Висновок, потом снова на закладку ДатаНаписання (тоисть покругу ).

[viter.alex]

Конечно можно. Имена закладок подкорректируешь сам

Sub GoToBookmark()
  Static counter As Integer
  Dim ar
  ar = Array("ДатаНаписания", "НомерДокумента", "Висновок")
  Selection.GoTo What:=wdGoToBookmark, Name:=ar(counter)
  counter = IIf(counter = UBound(ar), 0, counter + 1)
End Sub

[Окоча Юра]

Спасибо, друг!

[WordVest]

Попробуй другой вариант импортируй форму и модуль во вложении:

[Окоча Юра]

Подскажи как импортировать форму и модуль. Потому что я в этих делах не очень сильный знаток.

[WordVest]

Открываешь в Word VBA, File>Import> и импортируешь файлы вкладки, по одной за раз.
Потом открываешь Макросы>Выполнить макрос> Выбираешь GotoBookmarks

[WordVest]

Открываешь в Word VBA, File>Import> и импортируешь файлы вкладки, по одной за раз.
Потом открываешь Макросы>Выполнить макрос> Выбираешь GotoBookmarks

[Окоча Юра]

Тоже не плохо. Спасибо.

[Окоча Юра]

Можно ли, добавить в этот код, чтобы при каждом переходе в следующею закладку, поле этой закладки автоматически обновлялось (как будто я нажал бы F9):

Sub GoToBookmark()
Static counter As Integer
Dim ar
ar = Array("ДатаНаписания", "НомерДокумента", "Висновок")
Selection.GoTo What:=wdGoToBookmark, Name:=ar(counter)
counter = IIf(counter = UBound(ar), 0, counter + 1)
End Sub

[WordVest]

Ты установил зацеп который я нвписал7