Propriedade ParagraphFormat.ListNumberSeparator (Publisher)
Define ou recupera uma constante PbListSeparator que representa o separador de lista dos parágrafos especificados. Leitura/gravação.
Sintaxe
expressão. ListNumberSeparator
Expressão Uma variável que representa um objeto ParagraphFormat .
Valor de retorno
PbListNumberSeparator
Comentários
Você deve definir a propriedade ListType como um tipo de lista numerada antes de definir a propriedade ListNumberSeparator . Retornará uma mensagem de "Acesso Negado" se a lista não for numerada.
O valor da propriedade ListNumberSeparator pode ser uma das constantes PbListSeparator .
Exemplo
Este exemplo testa para ver se o tipo de lista é uma lista numerada, especificamente pbListTypeArabic (enumeração PbListType ). Se a propriedade ListType estiver definida como pbListTypeArabic, a propriedade ListNumberSeparator será definida como pbListSeparatorParenthesis. Caso contrário, o método SetListType é chamado e passa pbListTypeArabic como o parâmetro Valor (PbListType) e, em seguida, a propriedade ListNumberSeparator pode ser definida.
Dim objParaForm As ParagraphFormat
Set objParaForm = ActiveDocument.Pages(1).Shapes(1) _
.TextFrame.TextRange.ParagraphFormat
With objParaForm
If .ListType = pbListTypeArabic Then
.ListNumberSeparator = pbListSeparatorParenthesis
Else
.SetListType pbListTypeArabic
.ListNumberSeparator = pbListSeparatorParenthesis
End If
End With
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.