ListFormat.ListOutdent メソッド (Word)

  • [アーティクル]

指定範囲の段落の ListFormat オブジェクトに設定された箇条書きのレベルを 1 つずつ上げます。

構文

式。 ListOutdent

expression 必須です。 'ListFormat' オブジェクトを表す変数。

例

次の使用例は、作業中の文書の最初の箇条書きのレベルを 1 つ上げます。

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

次の使用例は、MyDoc.doc の 4 ～ 8 番目の段落に既定のアウトラインの箇条書き書式を設定し、段落のレベルを 1 つ下げます。その後、箇条書きの最初の段落のレベルを 1 つ上げます。

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 のサポートおよびフィードバックを参照してください。