Word VBA教程:Open方法

应用于 Documents对象的 Open方法。

打开指定的文档并将其添加至Documents集合。返回一个Document对象。

expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format, Encoding, Visible, OpenConflictDocument, OpenAndRepair, DocumentDirection, NoEncodingDialog)

expression   必需。该表达式返回一个 Documents对象。

FileName  Variant 类型,必需。文档名(可包含路径)。

ConfirmConversions  Variant 类型,可选。该属性为 True 时,如果文件不是 Microsoft Word 格式,则显示“文件转换”对话框。

ReadOnly  Variant 类型,可选。如果为 True,则以只读方式打开文档。注意 本参数不会覆盖保存的文档的只读建议设置。例如,如果文档在启用只读建议设置情况下保存,将 ReadOnly参数设为 False,也不会导致以可读写方式打开文件。

AddToRecentFiles  Variant 类型,可选。如果为 True,则会将文件名添加至“文件”菜单底部的最近使用过的文件列表中。

PasswordDocument  Variant 类型,可选。打开此文档时所需的密码。

PasswordTemplate  Variant 类型,可选。打开此模板时所需的密码。

Revert  Variant 类型,可选。当 FileName 是一个已打开的文档的文件名时,控制相应的操作。如果为 True,则放弃对已打开文档进行的所有尚未保存的改动,并将重新打开该文档。如果为 False,则激活已打开的文档。

WritePasswordDocument  Variant 类型,可选。保存对文档进行的更改时所需的密码。

WritePasswordTemplate  Variant 类型,可选。保存对模板进行的更改时所需的密码。

Format  Variant 类型,可选。打开文档时使用的文件转换器。可以是下列WdOpenFormat 常量之一。

WdOpenFormat 可以是下列 WdOpenFormat 常量之一:
wdOpenFormatAllWord
wdOpenFormatAuto 默认值。
wdOpenFormatDocument
wdOpenFormatEncodedText
wdOpenFormatRTF
wdOpenFormatTemplate
wdOpenFormatText
wdOpenFormatUnicodeText
wdOpenFormatWebPages

若要指定外部文件格式,请将OpenFormat属性应用于 FileConverter对象,以便确定要用于此参数的值。

Encoding  Variant 类型,可选。在查看保存的文档时,Microsoft Word 所使用的文档编码(代码页或字符集)。可以是任何有效的 MsoEncoding 常量。有关有效的 MsoEncoding 常量的列表的详细信息,请参阅“Visual Basic 编辑器”的“对象浏览器”。默认值是系统代码页。

Visible  Variant 类型,可选。如果为 True,则在可见窗口中打开文档。默认值为 True。

OpenConflictDocument  Variant 类型,可选。指定是否脱机操作打开文档的冲突文件。

OpenAndRepair  Variant 类型,可选。如果为 True,则修复文档,以防止文档毁坏。

DocumentDirection  WdDocumentDirection,可选。表明文本在文档中水平排列。

WdDocumentDirection 可以是下列 WdDocumentDirection 常量之一:
wdLeftToRight 默认值
wdRightToLeft

NoEncodingDialog  Variant 类型,可选。如果为 True,则跳过显示“编码”对话框,如果文字编码不能识别,Word 就会显示该对话框。默认值是 False。

应用于 OLEFormat对象的 Open方法。

打开指定的对象。

expression.Open

expression   必需。该表达式返回一个OLEFormat对象。

应用于 RecentFile、Subdocument 和 Version对象的 Open方法。

打开指定的对象。返回一个Document对象,该对象代表打开的对象。

expression.Open

expression   必需。该表达式返回以上一个对象。

VBA示例

当应用于 Documents对象时。

本示例以只读方式打开文档 MyDoc.doc。


Sub OpenDoc()
    Documents.Open FileName:="C:\MyFiles\MyDoc.doc", ReadOnly:=True
End Sub

本示例将利用 WordPerfect 6.x 文件转换器打开 Test.wp。


Sub OpenDoc2()
    Dim fmt As Variant
    fmt = Application.FileConverters("WordPerfect6x").OpenFormat
    Documents.Open FileName:="C:\MyFiles\Test.wp", Format:=fmt
End Sub

当应用于 RecentFiles对象时。

本示例打开 RecentFiles集合中的每一篇文档。


Sub OpenRecentFiles()
    Dim rFile As RecentFile
    For Each rFile In RecentFiles
        rFile.Open
    Next rFile
End Sub

当应用于 Version对象时。

本示例打开 Report.doc 的最新版本。


Sub OpenVersion()
    Dim mydoc As Document
    Set mydoc = Documents.Open("C:\MyFiles\Report.doc")
    If mydoc.Versions.Count > 0 Then
        mydoc.Versions(mydoc.Versions.Count).Open
    Else
        MsgBox "There are no saved versions for this document."
    End If
End Sub

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号