vba 打开word文档

导读：在日常工作中，我们经常需要使用到Word文档。而使用VBA程序打开Word文档，则是快速高效的方法之一。本文将为大家介绍如何使用VBA程序打开Word文档，包括新建空白文档、打开已有文档、自动保存文档等操作。

1.新建空白文档

1.1 创建Word对象

在打开或新建Word文档之前，我们需要先创建一个Word对象。可以使用以下代码创建一个Word对象：

Dim wordApp As Word.Application

Set wordApp = CreateObject("Word.Application")

该代码将创建一个名为“wordApp”的Word.Application对象。

1.2 新建空白文档

创建了Word对象之后，可以使用wordApp.Documents.Add方法创建一个新的空白文档。以下是示例代码：

Dim wordDoc As Word.Document

Set wordDoc = wordApp.Documents.Add

这将在Word应用程序中创建一个新的空白文档，并将其存储在名为“wordDoc”的Word.Document对象中。

1.3 显示Word应用程序

新建空白文档后，可以使用wordApp.Visible属性设置Word应用程序是否可见。例如，以下代码将显示Word应用程序：

wordApp.Visible = True

这将显示Word应用程序窗口，用户可以在其中进行编辑操作。

2.打开已有文档

2.1 打开Word文档

如果我们需要打开一个已有的Word文档，则可以使用wordApp.Documents.Open方法。以下是示例代码：

Dim wordDoc As Word.Document

Set wordDoc = wordApp.Documents.Open("C:\example.docx")

这将打开名为“example.docx”的Word文档，并将其存储在名为“wordDoc”的Word.Document对象中。需要注意的是，打开文档时需要指定文档的路径。

2.2 显示文档内容

打开文档后，我们可以使用wordDoc.ActiveWindow.View.Type属性设置文档的显示方式。例如，以下代码将文档以页面视图方式显示：

wordDoc.ActiveWindow.View.Type = wdPageView

这将以“页面视图”方式显示文档。Word文档的视图方式常见的有“普通视图”、“页面视图”、“阅读视图”等。

3.自动保存文档

3.1 自动保存文档

在使用VBA程序打开和编辑Word文档时，我们可能需要自动保存文档以避免意外丢失数据。可以使用wordDoc.Save方法保存文档。例如，以下代码将保存名为“example.docx”的Word文档：

wordDoc.SaveAs ("C:\example.docx")

这将将文档保存在指定路径下。

3.2 关闭文档

在操作完成后，我们需要使用wordDoc.Close方法关闭文档。例如，以下代码将关闭名为“example.docx”的Word文档：

wordDoc.Close

3.3 退出Word应用程序

关闭文档后，我们需要使用wordApp.Quit方法退出Word应用程序。例如，以下代码将退出Word应用程序：

wordApp.Quit

总之，使用VBA程序打开Word文档无疑是效率最高、最快捷的方法之一。根据不同的需求，我们可以灵活使用VBA程序完成各种文档操作，提高我们的工作效率。