перечисление всех страниц/Изменение стиля всех страниц в документе?

Знаю, как на 1-ой странице. МОжно ли получить указатели на все страницы или как-то еречислять их?ЦитироватьSub Margins( )Dim oDocDim oPageStylesDim oStyleDim oViewCursorDim oPageStyleNameDim fromleft%, fromtop%, fromright%, frombottom%oDoc = ThisComponentoViewCursor = oDoc.CurrentController.getViewCursor()oP ageStyleName = oViewCursor.PageStyleNameoPageStyles = oDoc.StyleFamilies.getByName("PageStyles ")oStyle = oPageStyles.getByName(oPageStyleName)'fr omleft, fromtop, fromright, frombottom = whatever you wantoStyle.LeftMargin = fromleftoStyle.TopMargin = fromtop oStyle.RightMargin = fromrightoStyle.BottomMargin = frombottomEnd Sub