Clase ListFormat (Word VBA)

La clase ListFormat representa los atributos de formato de lista que pueden aplicarse a los párrafos de un intervalo.

Set

Para usar una variable de clase ListFormat, primero debe ser instanciado, por ejemplo

Dim lft as ListFormat
Set lft = ActiveDocument.Range.ListFormat

Las variables de tipo ListFormat se pueden establecer utilizando el procedimiento Range.ListFormat

Métodos

Otros Métodos

ApplyBulletDefault - Agrega viñetas y formato a los párrafos del intervalo del objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ApplyBulletDefault

ApplyListTemplate - Aplica un conjunto de características de formato de lista al objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ApplyListTemplate ListTemplate:=

ApplyListTemplateWithLevel - Aplica un conjunto de características de formato de listas; opcionalmente para un nivel especificado.

ActiveDocument.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:=

ApplyNumberDefault - Agrega el esquema de numeración predeterminado a los párrafos del intervalo del objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ApplyNumberDefault

ApplyOutlineNumberDefault - Agrega el esquema numerado predeterminado a los párrafos del intervalo del objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ApplyOutlineNumberDefault

CanContinuePreviousList - Devuelve una constante WdContinue (wdContinueDisabled, wdResetListo wdContinueList) que indica si se puede continuar con el formato de la lista anterior.

Dim wceCanContinuePreviousList As WdContinue
wceCanContinuePreviousList = ActiveDocument.Range.ListFormat.CanContinuePreviousList(ListTemplate:=)

ConvertNumbersToText - Cambia a texto los números de lista y los campos LISTNUM del objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ConvertNumbersToText

CountNumberedItems - Devuelve el número de elementos con viñetas o números y campos LISTNUM del objeto ListFormat especificado.

Dim lngCountNumberedItems As Long
lngCountNumberedItems = ActiveDocument.Range.ListFormat.CountNumberedItems()

RemoveNumbers - Quita los números o viñetas de la lista especificada.

ActiveDocument.Range.ListFormat.RemoveNumbers

Propiedades

List Devuelve un objeto List que representa la primera lista con formato contenida en el objeto ListFormat especificado.

Dim lstList As List
Set lstList = ActiveDocument.Range.ListFormat.List

ListLevelNumber Devuelve o establece el nivel de lista para el primer párrafo del objeto ListFormat especificado.

ActiveDocument.Range.ListFormat.ListLevelNumber =

ListPictureBullet Devuelve el objeto InlineShape que representa la imagen utilizada como viñeta en una lista con viñetas de imagen.

Dim iseListPictureBullet As InlineShape
Set iseListPictureBullet = ActiveDocument.Range.ListFormat.ListPictureBullet

ListString Devuelve una cadena que representa la apariencia del valor de lista del primer párrafo del intervalo del objeto ListFormat especificado.

Dim strListString As String
strListString = ActiveDocument.Range.ListFormat.ListString

ListTemplate Devuelve un objeto ListTemplate que representa el formato de lista del objeto ListFormat especificado.

Dim lteListTemplate As ListTemplate
Set lteListTemplate = ActiveDocument.Range.ListFormat.ListTemplate

ListType Devuelve el tipo de listas que se encuentran en el intervalo del objeto ListFormat especificado.

Dim wltListType As WdListType
wltListType = ActiveDocument.Range.ListFormat.ListType

ListValue Devuelve el valor numérico del primer párrafo del intervalo del objeto ListFormat especificado.

Dim lngListValue As Long
lngListValue = ActiveDocument.Range.ListFormat.ListValue

Parent Devuelve un objeto Object que representa el objeto primario del objeto ListFormat especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Range.ListFormat.Parent

SingleList True si el objeto ListFormat especificado sólo contiene una lista.

Dim booSingleList As Boolean
booSingleList = ActiveDocument.Range.ListFormat.SingleList

SingleListTemplate True si el objeto ListFormat completo utiliza la misma plantilla de lista.

Dim booSingleListTemplate As Boolean
booSingleListTemplate = ActiveDocument.Range.ListFormat.SingleListTemplate