网站方案app注册推广拉人

我给VBA下的定义：VBA是个人小型自动化处理的有效工具。可以大大提高自己的劳动效率，而且可以提高数据的准确性。我这里专注VBA,将我多年的经验汇集在VBA系列九套教程中。

作为我的学员要利用我的积木编程思想，积木编程最重要的是积木如何搭建及拥有积木。在九套教程中我给出了大量的积木，同时讲解了如何搭建。为了让学员拥有更多的积木，我开始着手这部《VBA即用型代码手册（汉英）》的创作，这部手册约600页，集合约500多个的案例，案例我用汉语和英语同时发布，一方面学员从中可以更好的领会和掌握VBA中用到的一些英语知识，另一方面，大家可以看到各种各样的积木。这部手册是大家学习和工作中的不可多得的实用资料。今日的内容是： VBA即用型代码手册：Document 对象 Document Object

【分享成果，随喜正能量】170 世间万物，因果循环不休，你的善心善行，都可能成为你的善缘善果。每天忆佛念佛，每天都在佛菩萨的加持下生活，自然吉祥如意，法喜充满。

第六章 Word对象及示例

Word Objects and Macro Examples

2 Document 对象 Document Object

文档对象 - Word 文档

Document Object – A Word document

1）活动文档

ActiveDocument:

ActiveDocument.PrintOut

2）激活文档

ActiveDocument

Documents("Example.docx").Activate

3）当前文档

ThisDocument

ThisDocument.PrintOut

4）变量文档

Document Variables

Sub mynzVarExample()

Dim oDoc As Document

Set oDoc = ActiveDocument

oDoc.PrintOut

End Sub

5）打开文档

Open Document

Documents.Open "c:\Desktop\Test PM.docx"

6）打开文档到变量

Open Document to a variable

Dim oDoc as Document

Set oDoc = Documents.Open("c:\Desktop\Test PM.docx")

7）创建文档

Create New Document

Documents.Add

8）基于某个模板创建一个新文档

create a new doc based on some template:

Documents.Add Template:="C:\Program Files\Microsoft Office\Templates\MyTemplate.dotx"

9）基于某个模板创建一个新文档到变量

Create a new document based on a template into a variable

Dim oDoc as Document

Set oDoc = Documents.Add (Template:="C:\Program Files\Microsoft Office\Templates\MyTemplate.dotx")

10） 保存文档

Save Document

ActiveDocument.Save

11） 另存为文档

SaveAs

ActiveDocument.SaveAs FileName:= c:\Desktop\test2.docx", FileFormat:=wdFormatDocument

12）关闭文档

Close Document

ActiveDocument.Close wdSaveChanges

13） 不保存关闭文档

without saving changes

ActiveDocument.Close wdDoNotSaveChanges

14）打印文档

Print Document

ActiveDocument.PrintOut

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：