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
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.