Método ListFormat.ApplyListTemplate (Word)

Se aplica a un conjunto de características de formato de lista al objeto ListFormat especificado.

Sintaxis

expresión. ApplyListTemplate( _ListTemplate_ , _ContinuePreviousList_ , _ApplyTo_ , _DefaultListBehavior_ )

expresión requerida. Variable que representa un objeto "ListFormat".

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
ListTemplate Obligatorio ListTemplate Plantilla de lista que se va a aplicar.
ContinuePreviousList Opcional Variant True para continuar la numeración de la lista anterior; False para iniciar una nueva lista.
ApplyTo Opcional Variant La parte de la lista que se pueden aplicar a la plantilla de lista. Puede ser una de las siguientes constantes WdListApplyTo: wdListSelection, wdListWholeList o wdListThisPointForward.
DefaultListBehavior Opcional Variant Establece un valor que especifica si Microsoft Word utiliza el formato orientado al Web es nueva para una mejor presentación de lista. Puede ser cualquiera de las siguientes constantes WdDefaultListBehavior: wdWord8ListBehavior (formato compatible con Microsoft Word 97) o wdWord9ListBehavior (formato orientado al Web). Por motivos de compatibilidad, la constante predeterminada es wdWord8ListBehavior, pero en nuevos procedimientos que se debe utilizar wdWord9ListBehavior para aprovechar orientado al Web formato mejorado con sangría y de varios niveles listas.

Ejemplo:

En este ejemplo la variable myRange se establece en un intervalo del documento activo y, a continuación, se comprueba si el intervalo presenta formato de lista. Si no se ha aplicado este formato, la cuarta plantilla de lista de esquema numerado se aplicará al intervalo.

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.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdOutlineNumberGallery) _ 
 .ListTemplates(4) 
End If

Consulte también

Objeto ListFormat

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.