Método ListFormat.ApplyBulletDefault (Word)

  • Artículo

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

Sintaxis

expresión. ApplyBulletDefault( _DefaultListBehavior_ )

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

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
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: 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.

Comentarios

Si a los párrafos ya se les ha dado formato con viñetas, este método quita las viñetas y el formato.

Ejemplo:

En este ejemplo se agregan viñetas y formato a todos los párrafos de la selección. Si ya hay viñetas en la selección, el ejemplo quita las viñetas y el formato.

Selection.Range.ListFormat.ApplyBulletDefault

En este ejemplo se agregan o se quitan la viñeta y el formato del segundo párrafo de MyDoc.doc.

Documents("MyDoc.doc").Paragraphs(2).Range.ListFormat _ 
 .ApplyBulletDefault

En este ejemplo se establece la variable myRange de un intervalo que abarca los párrafos del tres al seis, ambos inclusive, del documento activo y, a continuación, se comprueba si el intervalo tiene formato de lista. Si no hay formato de lista, se agregan viñetas predeterminadas.

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

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.