Documents (colección de objetos)
Importante
En este artículo es máquina traducido, vea la exención de responsabilidad. Encontrará la versión en inglés de este artículo aquí para su referencia.
Una colección de todos los Document objetos que están actualmente abiertos en Word.
Observaciones
Utilice la propiedad Documents para devolver 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
Utilice la Add método para crear un nuevo 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
Utilice 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"
Utilice la sintaxis Documents(Index), donde Index corresponde al nombre de documento o al número de índice, para devolver un solo objeto Document. La instrucción siguiente 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 cita la colección Documents para determinar si está abierto el documento denominado "Report.doc". Si la colección Documents lo contiene, se activa el documento; de lo contrario, 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
Nota
Declinación de responsabilidades de traducción automática: Este artículo se ha traducido con un sistema informático sin intervención humana. Microsoft ofrece estas traducciones automáticas para que los hablantes de otros idiomas distintos del inglés puedan disfrutar del contenido sobre los productos, los servicios y las tecnologías de Microsoft. Puesto que este artículo se ha traducido con traducción automática, es posible que contenga errores de vocabulario, sintaxis o gramática.