Objeto Subdocuments (Word)

Una colección de objetos Subdocument que representa los subdocumentos de un documento o intervalo.

Comentarios

Utilice la propiedad Subdocuments para devolver la colección de subdocumentos. En el siguiente ejemplo se expande todos los subdocumentos del documento activo.

ActiveDocument.Subdocuments.Expanded = True

Utilice el método AddFromFile o AddFromRange para agregar un subdocumento a un documento. En el siguiente ejemplo se agrega un subdocumento denominado "Setup.doc" al final del documento activo.

ActiveDocument.Subdocuments.Expanded = True 
Selection.EndKey Unit:=wdStory 
Selection.InsertParagraphBefore 
ActiveDocument.Subdocuments.AddFromFile Name:="C:\Temp\Setup.doc"

En el siguiente ejemplo, se aplica el estilo Título 1 al primer párrafo de la selección y, a continuación, se crea un subdocumento para el contenido de la misma.

Selection.Paragraphs(1).Style = wdStyleHeading1 
With ActiveDocument.Subdocuments 
 .Expanded = True 
 .AddFromRange Range:=Selection.Range 
End With

Utilice Subdocuments (Index), donde Index es el número de índice, para devolver un solo objeto Subdocument. El ejemplo siguiente muestra la ruta de acceso y el nombre del primer subdocumento del documento activo.

If ActiveDocument.Subdocuments(1).HasFile = True Then 
 MsgBox ActiveDocument.Subdocuments(1).Path & _ 
 Application.PathSeparator _ 
 & ActiveDocument.Subdocuments(1).Name 
End If

Vea también

Referencia de modelos de objetos de Word

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.