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
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.