Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Inserta todo o parte del archivo especificado.
Sintaxis
expresión.
InsertFile( _FileName_ , _Range_ , _ConfirmConversions_ , _Link_ , _Attachment_ )
expresión necesaria. Variable que representa un objeto Selection.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| FileName | Necesario | String | Ruta de acceso y nombre de archivo del archivo que se va a insertar. Si no especifica ninguna ruta de acceso, Word considerará que el archivo se encuentra en la carpeta actual. |
| Range | Opcional | Variant | Si el archivo especificado es un documento de Word, este parámetro hace referencia a un marcador. Si el tipo de archivo es distinto, como por ejemplo una hoja de cálculo de Microsoft Excel, este parámetro hace referencia a un rango con nombre o a un rango de celdas, por ejemplo R1C1:R3C4. |
| ConfirmConversions | Opcional | Variant | True para que Word le pida que confirme la conversión al insertar archivos en formatos distintos al formato de documento de Word. |
| Link | Opcional | Variant | True para insertar el archivo mediante un campo INCLUDETEXT. |
| Attachment | Opcional | Variant | True para insertar el archivo como datos adjuntos a un mensaje de correo electrónico. |
Ejemplo
En este ejemplo, se utiliza un campo INCLUDETEXT para insertar el archivo TEST.DOC en el punto de inserción.
Selection.Collapse Direction:=wdCollapseEnd
Selection.InsertFile FileName:="C:\TEST.DOC", Link:=True
En este ejemplo, se crea un nuevo documento y, a continuación, se inserta el contenido de cada archivo de texto de la carpeta C:\TMP en dicho documento.
Documents.Add
ChDir "C:\TMP"
myName = Dir("*.TXT")
While myName <> ""
With Selection
.InsertFile FileName:=myName, ConfirmConversions:=False
.InsertParagraphAfter
.InsertBreak Type:=wdSectionBreakNextPage
.Collapse Direction:=wdCollapseEnd
End With
myName = Dir()
Wend
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.