Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna uma coleção de lista que contém todas as listas formatadas no documento especificado. Somente leitura.
Sintaxe
expression. Lists
expressão Uma variável que representa um objeto documento .
Comentários
Para obter informações sobre como devolver um único membro de uma coleção, veja Devolver um objeto de uma coleção.
Exemplo
Este exemplo formata a seleção como uma lista numerada. Em seguida, o exemplo exibe uma caixa de mensagem que relata o número de listas no documento ativo.
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)
MsgBox "This document has " & ActiveDocument.Lists.Count _
& " lists."
Este exemplo formata a terceira lista do documento ativo com o formato de lista com marcadores padrão. Se a lista já estiver formatada com um formato de lista com marcadores, o exemplo removerá a formatação.
If ActiveDocument.Lists.Count >= 3 Then
ActiveDocument.Lists(3).Range.ListFormat.ApplyBulletDefault
End If
Este exemplo exibe uma caixa de mensagem que relata o número de itens em cada lista de MyLetter.doc.
Set myDoc = Documents("MyLetter.doc")
i = myDoc.Lists.Count
For each li in myDoc.Lists
Msgbox "List " & i & " has " & li.CountNumberedItems _
& " items."
i = i - 1
Next li
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.