Compartir a través de


Objeto Documents (Word)

Colección de todos los objetos Document que están abiertos actualmente en Word.

Comentarios

Use la propiedad Documents para obtener la colección Documents. En el ejemplo siguiente, se muestran los nombres de los documentos abiertos.

For Each aDoc In Documents 
 aName = aName & aDoc.Name & vbCr 
Next aDoc 
MsgBox aName

Use el método Add para crear un documento vacío y agregarlo a la colección Documents . En el ejemplo siguiente, se crea un nuevo documento basado en la plantilla Normal.

Documents.Add

Use el método Open para abrir un archivo. En el ejemplo siguiente se abre el documento denominado "Sales.doc".

Documents.Open FileName:="C:\My Documents\Sales.doc"

Use Documents (Index), donde Index es el nombre del documento o el número de índice para devolver un único objeto Document . En el ejemplo siguiente, se cierra el documento denominado "Report.doc" sin guardar los cambios.

Documents("Report.doc").Close SaveChanges:=wdDoNotSaveChanges

El número de índice representa la posición del documento en la colección Documents. En el ejemplo siguiente se activa el primer documento de la colección Documents.

Documents(1).Activate

En el ejemplo siguiente, se enumera la colección Documents para determinar si el documento denominado "Report.doc" está abierto. Si este documento se incluye en la colección Documents, se activa el documento; si no, se abre.

For Each doc In Documents 
 If doc.Name = "Report.doc" Then found = True 
Next doc 
If found <> True Then 
 Documents.Open FileName:="C:\Documents\Report.doc" 
Else 
 Documents("Report.doc").Activate 
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.