Método ListFormat.ApplyBulletDefault (Word)

Adiciona marcadores e formatação aos parágrafos do intervalo do objeto ListFormat especificado.

Sintaxe

expression. ApplyBulletDefault( _DefaultListBehavior_ )

expressão Obrigatório. Uma variável que representa um objeto 'ListFormat'.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
DefaultListBehavior	Opcional	Variant	Define um valor que especifica se o Microsoft Word usa nova formatação orientada pela Web para uma melhor exibição de lista. Pode ser uma das seguintes constantes: wdWord8ListBehavior (usar formatação compatível com o Microsoft Word 97) ou wdWord9ListBehavior (usar orientada pela Web formatação). Por motivos de compatibilidade, a constante padrão é wdWord8ListBehavior, mas em novos procedimentos, que você deve usar wdWord9ListBehavior para aproveitar melhor orientada pela Web formatação em relação ao recuo e vários níveis de lista.

Comentários

Se os parágrafos já estiverem formatados com marcadores, esse método removerá os marcadores e a formatação.

Exemplo

Este exemplo adiciona marcadores e formatação aos parágrafos da seleção. Se já houver marcadores na seleção, o exemplo removerá os marcadores e a formatação.

Selection.Range.ListFormat.ApplyBulletDefault

Este exemplo adiciona ou remove marcadores e formatação no segundo parágrafo de MyDoc.doc.

Documents("MyDoc.doc").Paragraphs(2).Range.ListFormat _ 
 .ApplyBulletDefault

Este exemplo define a variável myRange com um intervalo que inclui os parágrafos de três a seis do documento ativo e verifica se o intervalo contém formatação de lista. Se não existir formatação de lista, serão adicionados marcadores padrão.

Set myDoc = ActiveDocument 
Set myRange = myDoc.Range( _ 
 Start:= myDoc.Paragraphs(3).Range.Start, _ 
 End:=myDoc.Paragraphs(6).Range.End) 
If myRange.ListFormat.ListType = wdListNoNumbering Then 
 myRange.ListFormat.ApplyBulletDefault 
End If

Confira também

Objeto ListFormat

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.