Циклы

[Busine2009]

А как можно в этом случает применить цикл?
Вот код (переход к следующему колонтитулу):

Код: Выделить всё

ActiveWindow.ActivePane.View.NextHeaderFooter

Надо чтобы цикл продолжался, пока не вылезет ошибка (ошибка должна появиться, когда очередь дойдёт до последнего колонтитула).
Как это можно сделать?