Word VBA教程:InsertFile方法

插入指定文档的全部或部分。

expression.InsertFile(FileName, Range, ConfirmConversions, Link, Attachment)

expression   必需。该表达式返回一个 Range 或 Selection对象。

FileName   String 类型,必需。需要插入的文档的路径及文件名。如果没有指定路径,则 Word 将文档路径设为当前路径。

Range   Variant 类型,可选。当指定的文档是 Word 文档时,此参数代表书签。当该文档为其他类型时(例如,Microsoft Excel 工作表),此参数代表已命名的区域或单元格区域(例如,R1C1:R3C4)。

ConfirmConversions   Variant 类型,可选。如果值为 True,则 Word 将在插入非“Word 文档”格式的文档时提示对转换进行确认。

Link   Variant 类型,可选。如果值为 True,则可用 INCLUDETEXT 域插入该文档。

Attachment   Variant 类型,可选。为 True 时将该文件作为附件插入电子邮件消息中。

VBA示例

本示例用 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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号