Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Agrega el esquema de numeración predeterminado a los párrafos del intervalo del objeto ListFormat especificado.
Sintaxis
expresión.
ApplyNumberDefault( _DefaultListBehavior_ )
expresión necesaria. 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. |
Observaciones
Si los párrafos ya tienen formato de lista numerada, este método quita los números y el formato.
Ejemplo
En este ejemplo se numeran los párrafos de la selección. Si la selección ya es una lista numerada, el ejemplo quita los números y el formato.
Selection.Range.ListFormat.ApplyNumberDefault
En este ejemplo se establece la variable myRange para incluir los párrafos del documento activo desde el tres hasta el seis, ambos inclusive y, a continuación, se comprueba si el intervalo tiene formato de lista. Si no hay formato de lista, se aplican los números predeterminados 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.ApplyNumberDefault
End If
Vea también
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.