Borders.DistanceFrom property (Word)
Возвращает или задает значение, указывающее, измеряется ли указанная граница страницы от края страницы или из текста, который она окружает. Чтение и запись WdBorderDistanceFrom.
Синтаксис
выражение. DistanceFrom
выражение (обязательно). Переменная, представляющая коллекцию Borders.
Пример
В этом примере добавляется одна граница вокруг каждой страницы в разделе 1 активного документа, а затем устанавливается расстояние между каждой границей и соответствующим краем страницы.
Dim borderLoop As Border
With ActiveDocument.Sections(1)
For Each borderLoop In .Borders
borderLoop.LineStyle = wdLineStyleSingle
borderLoop.LineWidth = wdLineWidth050pt
Next borderLoop
With .Borders
.DistanceFrom = wdBorderDistanceFromPageEdge
.DistanceFromTop = 20
.DistanceFromLeft = 22
.DistanceFromBottom = 20
.DistanceFromRight = 22
End With
End With
В этом примере добавляется граница вокруг каждой страницы в первом разделе выделенного фрагмента, а затем устанавливается расстояние между текстом и границей страницы в 6 пунктов.
Dim borderLoop As Border
With Selection.Sections(1)
For Each borderLoop In .Borders
borderLoop.ArtStyle = wdArtSeattle
borderLoop.ArtWidth = 22
Next borderLoop
With .Borders
.DistanceFrom = wdBorderDistanceFromText
.DistanceFromTop = 6
.DistanceFromLeft = 6
.DistanceFromBottom = 6
.DistanceFromRight = 6
End With
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.