Share via


Método Selection.InsertFile (Word)

Insere todo o arquivo especificado ou parte dele.

Sintaxe

expressão. InsertFile( _FileName_ , _Range_ , _ConfirmConversions_ , _Link_ , _Attachment_ )

expressão Obrigatório. Uma variável que representa um objeto Selection.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
FileName Obrigatório String O caminho e o nome do arquivo a ser inserido. Se você não especificar um caminho, o Word partirá do pressuposto de que o arquivo se encontra na pasta atual.
Range Opcional Variant Quando o arquivo especificado é um documento do Word, esse parágrafo se refere a um indicador. Quando o arquivo é de outro tipo (por exemplo, uma planilha do Microsoft Excel), esse parâmetro se refere a um intervalo nomeado ou a um intervalo de células (por exemplo, L1C1:L3C4).
ConfirmConversions Opcional Variant True para fazer com que o Word peça a você que confirme a conversão ao inserir arquivos de outros formatos que não sejam o formato de documento do Word.
Link Opcional Variant True para inserir o arquivo usando um campo INCLUDETEXT.
Attachment Opcional Variantes True para inserir o arquivo como um anexo a uma mensagem de email.

Exemplo

Este exemplo usa um campo INCLUDETEXT para inserir o arquivo TEST.DOC no ponto de inserção.

Selection.Collapse Direction:=wdCollapseEnd 
Selection.InsertFile FileName:="C:\TEST.DOC", Link:=True

Este exemplo cria um novo documento e insere no novo documento o conteúdo de cada um dos arquivos de texto da pasta C:\TMP.

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

Confira também

Objeto Selection

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.