Microsoft Word Suite
290
This example formats paragraphs four through eight in the active document as an outline-
numbered list, and then it indents the paragraphs one level.
set myDoc to active document
set myRange to create range myDoc start (start of content of text object of ¬
paragraph 4 of myDoc) end (end of content of text object of ¬
paragraph 8 of myDoc)
apply list format template list format of myRange list template ¬
(list template 1 of (get list gallery outline number gallery))
list indent list format of myRange
Command: list outdent
Decreases the list level of the paragraphs in the range for the specified list format object, in
increments of one level.
Syntax
list outdent list format Required. An expression that returns a list format object.
Example
This example reduces the indent of each paragraph in the first list in the active document by one
level.
list outdent list format of text object of Word list 1 of active document
This example formats paragraphs four through eight in MyDoc.doc as an outline-numbered list,
indents the paragraphs one level, and then removes the indent from the list.
set myDoc to document "MyDoc.doc"
set myRange to create range myDoc start (start of content of text object of ¬
paragraph 4 of myDoc) end (end of content of text object of ¬
paragraph 8 of myDoc)
apply list format template list format of myRange list template ¬
(list template 1 of (get list gallery outline number gallery))
list indent list format of myRange
list outdent list format of text object of paragraph 4 of myDoc
Command: make compatibility default
Sets the compatibility options in the Compatibility pane of the Preferences dialog box (Word
menu) as the default settings for new documents.
Syntax
make compatibility default document Required. An expression that returns a document object.