Метод Selection.InsertFile (Word)
Вставляет все или часть указанного файла.
Синтаксис
выражение. InsertFile
( _FileName_
, _Range_
, _ConfirmConversions_
, _Link_
, _Attachment_
)
выражение (обязательно). Переменная, представляющая объект Selection .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
FileName | Обязательный | String | Путь и имя вставляемого файла. Если путь не указан, Word предполагает, что файл находится в текущей папке. |
Range | Необязательный | Variant | Если указанный файл является документом Word, этот параметр ссылается на закладку. Если файл имеет другой тип (например, лист Microsoft Excel), этот параметр ссылается на именованный диапазон или диапазон ячеек (например, R1C1:R3C4). |
ConfirmConversions | Необязательный | Variant | True , чтобы word запросило подтверждение преобразования при вставке файлов в форматах, отличных от формата документа Word. |
Link | Необязательный | Variant | Значение true , чтобы вставить файл с помощью поля INCLUDETEXT. |
Attachment | Необязательный | Variant | Значение true , чтобы вставить файл в виде вложения в сообщение электронной почты. |
Пример
В этом примере поле INCLUDETEXT используется для вставки файла TEST.DOC в точку вставки.
Selection.Collapse Direction:=wdCollapseEnd
Selection.InsertFile FileName:="C:\TEST.DOC", Link:=True
В этом примере создается новый документ, а затем вставляется содержимое каждого текстового файла в папке 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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.