Поделиться через

Метод ListFormat.ListOutdent (Word)

  • Статья

Уменьшает уровень списка абзацев в диапазоне для указанного объекта ListFormat с шагом на один уровень.

Синтаксис

выражение. ListOutdent

выражение (обязательно). Переменная, представляющая объект ListFormat.

Пример

В этом примере отступ каждого абзаца в первом списке активного документа уменьшается на один уровень.

ActiveDocument.Lists(1).Range.ListFormat.ListOutdent

В этом примере абзацы с 4 по восемь в активном документе форматируются как список с номером структуры, отступы на один уровень, а затем удаляются отступы из первого абзаца списка.

Dim docActive As Document 
Dim rngTemp As Range 
 
Set docActive = ActiveDocument

Set rngTemp = _ 
 docActive.Range( _ 
 Start:=docActive.Paragraphs(4).Range.Start, _ 
 End:=docActive.Paragraphs(8).Range.End) 
 
With rngTemp.ListFormat 
 .ApplyOutlineNumberDefault 
 .ListIndent 
End With 
 
docActive.Paragraphs(4).Range.ListFormat.ListOutdent

См. также

Объект ListFormat

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.