简介：这份PDF教程面向已具备VBA基础、希望深入掌握Office自动化的办公人员与开发者，聚焦ExcelVBA与WordVBA第4季的核心内容，系统讲解对象、集合、属性与方法的使用逻辑。教程以Word对象模型为主线，逐一剖析Application、Documents与Document的引用方式，对比Excel中ActiveWorkbook、ThisWorkbook的相似用法；并深入Range、Selection对象，演示字符、单词、句子、段落等集合的索引访问，以及字体颜色、加粗等属性设置和Activate、Copy、Paste等方法调用，还涉及表格与查找替换对象。资源包为单个PDF文件，约1.92MB，内容紧凑便于随时查阅。目前已有848人学习。读者可借此理清VBA对象层级关系，掌握文档内容的精细操控思路，为编写自定义宏、提升办公效率打下扎实基础。
1. WordVBA 第4季知识地图：从对象模型到文档自动化的全景
很多人学 WordVBA 的第一反应是「照着 ExcelVBA 的套路搬过来」，结果一上手就翻车——Cells(5,2)在 Excel 里是第 5 行第 2 列，到了 Word 里Characters(3)却代表文档第 3 个字符，同一个词在不同宿主里含义完全不同。第4季这份教程的核心价值，恰恰是把 WordVBA 的对象模型从头捋了一遍：Application是 Word 软件本身，Documents是所有打开文档的集合，Document是单个文档，Range和Selection是操作文本的两把刀，Characters/Words/Sentences/Paragraphs是文本的四种切分粒度。整季内容围绕「集合 → 对象 → 属性 → 方法」这条主线展开，前半段讲对象模型和常用属性，后半段落到新建、打开、保存、关闭、打印这些真实操作。适合已经会写简单宏、但一碰到 Word 文档结构就发怵的人，也适合正在复习 VBA 对象体系、想把 Excel 和 Word 两套模型对照记牢的人。
2. 对象模型四层拆解：Application、Document、Range、Selection 到底谁管谁
WordVBA 的所有代码几乎都在这四层里打转。把这四层的关系记牢，后面写什么都是查表。梳理下来会发现，教程第4季的编排逻辑就是「先认门牌，再学开门」——先告诉你每个对象代表什么，再告诉你它能干什么。
2.1 从 Application 到 Document：谁包含谁
Application代表 Word 软件本身，是所有对象的根。它下面挂着Documents集合，集合里每一个元素就是一个Document对象。教程里给了一个很直白的类比：集合好比多个团队，每个团队都是一个对象，多个对象组成了集合。这个类比虽然朴素，但足够把「集合不是对象、集合里装的才是对象」这件事说清楚。
引用当前文档有三种写法，教程明确列了出来：
| 写法 | 含义 | 对应 ExcelVBA |
|---|---|---|
ActiveDocument | 当前活动文档 | ActiveWorkbook/ActiveSheet |
ThisDocument | 包含 VBA 代码的文档 | ThisWorkbook |
Documents("文档名") | 按名称访问指定文档 | Workbooks("名")/Worksheets("名") |
这三种写法的区别是复习时的第一个易错点：ActiveDocument会随焦点切换而变，ThisDocument永远指向代码所在的那个文档。写宏时如果操作对象和代码不在同一个文档里，用ActiveDocument更稳；如果代码就写在这个文档的模块里、且不希望用户切换文档后跑偏，ThisDocument才是后悔药。
Documents集合本身也有方法，教程列了四个：Documents.Add新建空文档并加入集合、Documents.Open打开指定文档、Documents.Close关闭一个或多个文档、Documents.Item(indexs)按索引取文档。这四个方法基本覆盖了文档生命周期的前半段。
2.2 Range 与 Selection：一个管「范围」，一个管「光标」
这是 WordVBA 里最容易混淆的一对。教程的定义很干脆：Range代表文档中的一部分内容，用起止下标描述；Selection代表当前所选的内容，跟用户的光标和选区绑定。
Range的构造方式是Range(开始下标, 结束下标前一个字符)。教程举的例子是Range(2,5)，意思是从下标 2 开始、到下标 5 之前那个字符为止。这个「前一个字符」的细节是血泪经验级别的坑——它和很多语言里左闭右开的区间习惯一致，但初学者按「包含结束位」去理解就会多选一个字符。Document.Range.Text返回整个文档的文本字符串，ActiveDocument.Content也能拿到全文内容，两者在取全文时效果接近，但Content返回的是一个 Range 对象，可以继续链式操作。
Selection则完全跟着用户走。教程列出的方法有Selection.Activate激活、Selection.Copy拷贝、Selection.Cut剪切、Selection.Paste粘贴、Selection.Select选择。这几个方法都是「动作」，不是「属性」，记住这一点就不会把Selection.Copy写成Selection.Copy = True这种翻车写法。
提示：
Range是「离线」的，构造出来就固定指向那段文本，不受光标移动影响；Selection是「在线」的，用户点一下鼠标它就变了。批量处理文本用Range，模拟人工操作、需要跟随光标位置时用Selection。
2.3 四种文本切分粒度：Characters、Words、Sentences、Paragraphs
教程把文本切分单独拎出来讲，是因为 Word 里「一段文字」可以从四个粒度去看：字符、单词、句子、段落。前三个返回的是Range对象集合，Paragraphs返回的是Paragraph对象集合，这是它们唯一的本质区别。
Characters：范围或文档中字符的集合，每个元素是 RangeWords：范围或文档中单词的集合，每个元素是 RangeSentences：范围或文档中句子的集合，每个元素是 RangeParagraphs：段落的集合，每个元素是 Paragraph 对象
访问方式统一用索引：Document.Paragraphs(1)是第一个段落，Document.Paragraphs(1).Range.Text取第一段的文字。教程里那个「把数字变成红色粗体」的示例，就是遍历Characters集合、用IsNumeric判断、再改Bold和Font.ColorIndex属性，把「集合遍历 + 属性修改」这个套路演示了一遍：
Sub 将数字变成红色粗体() ' 遍历文档中全部字符 For i = 1 To Word.Application.ActiveDocument.Characters.Count Set 每个字符 = Word.Application.ActiveDocument.Characters(i) If IsNumeric(每个字符.Text) Then 每个字符.Bold = True 每个字符.Font.ColorIndex = wdGreen End If Next End Sub这段代码的关键参数有三个：Characters.Count给出循环上界，Characters(i)按索引取出单个字符 Range，Font.ColorIndex接预定义常量wdGreen。逻辑上它把「判断条件 → 改属性」串成了一条线，是复习集合遍历时最值得默写的一段。注意IsNumeric对空字符和全角数字的判断有边界情况，实际跑之前最好先拿一小段文本试。
2.4 属性与方法的分界线
教程对这两个概念的定义只有一句话，但足够用：属性是对象特有的特性，方法是对象能执行的动作。Bold、Font.ColorIndex、Count是属性，读或写；Activate、Copy、Paste、PrintOut是方法，调用即执行。
复习时判断一个成员是属性还是方法，看它后面跟不跟括号、能不能赋值。每个字符.Bold = True是给属性赋值；Selection.Copy是调方法，后面不加= 什么。这条分界线不清楚，写出来的代码要么报「参数不可选」，要么静默不生效，属于玄学级调试噩梦。
3. Application 与 Document 常用成员：一张参数表顶十页笔记
对象模型认完之后，真正写代码时高频用到的其实是具体成员。教程第4季用两张附表把Application和Document的常用属性、方法集中列了出来，这种「参数表」式的整理方式特别适合复习——不用翻文档，扫一眼就知道该调谁。
3.1 Application 的 20 多个高频成员怎么记
Application这一层管的是「Word 这个软件」的状态，不是某个文档的内容。教程列出的成员可以按用途分成四组来记，比死背清单高效得多：
| 分组 | 成员 | 返回/作用 |
|---|---|---|
| 文档与窗口 | ActiveDocument | 当前文档，可简写 |
ActiveWindows | 当前窗口 | |
Documents.Count | 打开的文档数 | |
Height/Width/Left | 应用窗口尺寸与位置 | |
| 环境信息 | Version/Build | 版本号与编译序号 |
Path | 活动文档路径与文件名 | |
UserName | 应用程序用户名 | |
Caption | 当前应用程序名 | |
| 资源与模板 | FontNames.Count | 可用字体数 |
Templates.Count | 使用中的模板数 | |
NormalTemplate.FullName | 标准模板名称及位置 | |
System.FreeDiskSpace | 所在磁盘可用空间 | |
| 动作方法 | Activate/Quit | 激活 / 退出 |
PrintOut | 打印全部或部分 | |
Resize/Move | 调整窗口大小 / 位置 | |
GoForward | 在最近三个编辑位置间前移 |
记这组的窍门是「先分环境、再分动作」：凡是返回数量、路径、版本的都是环境信息，凡是动词开头的都是方法。教程特别标注了Resize在窗口最大化或最小化时会出错，DefaultSaveFormat返回空字符串表示 Word 文档——这类边界说明正是复习时最容易漏掉的。
3.2 Document 的统计类属性：Count 家族
Document这一层的成员明显偏向「文档内容统计」。教程附2 里一口气列了二十多个Count属性，乍看吓人，但按对象类型归类后就清晰了：
- 文本结构类：
Characters.Count、Words.Count、Sentences.Count、Paragraphs.Count、Sections.Count - 引用注释类：
Bookmarks.Count、Comments.Count、Footnotes.Count、Endnotes.Count、Fields.Count、Hyperlinks.Count - 目录索引类：
Indexes.Count、TablesOfContents.Count、TablesOfAuthorities.Count、TablesOfFigures.Count - 对象容器类：
Shapes.Count、Styles.Count、Tables.Count、ListParagraphs.Count
这四组里，文本结构类是日常最常用的，引用注释类在做文档质检时有用（比如统计批注数判断文档是否审完），目录索引类偏排版场景。除了 Count，Document还有几个非统计类的高频成员：FullName返回全名及位置、Path返回所在路径、HasPassword判断是否有密码保护、ReadOnly判断是否只读、Saved判断是否已保存、PageSetup拿页面设置、AttachedTemplate.FullName拿所用模板。Password = xxx可以设置打开密码，Saved配合If ActiveDocument.Saved = False Then ActiveDocument.Save就是「有改动才保存」的标准写法。
注意：
Document.Paragraphs.Count统计的是段落数，但 Word 里最后一个空段落也会被计入，所以「看起来 5 段」的文档可能返回 6。做段落遍历时要么从 1 到 Count 全走一遍，要么先判断段落文本是否为空。
3.3 新建、打开、保存、关闭：文档生命周期的四步
教程把文档操作单独成节，是因为这四步是几乎所有自动化脚本的骨架。新建用Documents.Add，保存用ActiveDocument.Save（存回原位）或SaveAs2 "路径"（另存），关闭用ActiveDocument.Close。教程给了一个「新建并另存」的链式写法：
Sub 新建并另存() ' 新建文档后直接另存到指定路径 Documents.Add.SaveAs2 "c:\1.docx" ' 关闭当前文档 ActiveDocument.Close End SubSaveAs2的参数是目标路径，链式调用省掉了中间变量。打开文档用Documents.Open，教程附了完整的参数表，实际高频的只有前几个：FileName文档名可含路径、ReadOnly只读打开、AddToRecentFiles是否加入最近列表、PasswordDocument打开密码、Visible是否可见窗口打开。其余十几个参数（ConfirmConversions、Revert、WritePasswordDocument、Format、Encoding、OpenAndRepair等）属于「知道有、用到再查」的层级，复习时不必全背，但要记得OpenAndRepair能在文档损坏时尝试修复。
关闭文档的关键在SaveChanges参数，教程用一张小表把三个常量讲透了：
| 常量 | 值 | 行为 |
|---|---|---|
wdSaveChanges | -1 | 自动保存，不提示 |
wdPromptToSaveChanges | -2 | 提示用户保存 |
wdDoNotSaveChanges | 0 | 不保存待定更改 |
批量关闭所有文档时，教程给的写法是遍历Documents集合、对每个doc调Close savechanges:=wdPromptToSaveChanges。这里有个细节：遍历集合的同时关闭元素，索引会变，所以用For Each doc In Documents比For i = 1 To Count安全。这个坑不写出来很多人会踩。
4. 打印与批量处理：PrintOut 参数与文件夹级操作
打印看起来是小事，但PrintOut的参数组合是第4季里信息密度最高的一块。教程用了整整一节讲打印范围，因为「打印全部」和「打印指定页」走的是同一方法的不同参数，记混了就会打出几百页废纸。
4.1 PrintOut 的 Range 参数：五种范围常量
PrintOut的核心参数是Range，教程列了五个常量：
| 常量 | 含义 |
|---|---|
wdPrintAllDocument | 整个文档 |
wdPrintCurrentPage | 当前页面 |
wdPrintSelection | 当前所选内容 |
wdPrintFromTo | 指定起止范围，配合From/To |
wdPrintRangeOfPages | 指定页面集合，配合Pages |
用法上，打印当前页是文档.PrintOut Range:=wdPrintCurrentPage；打印第 1 到第 3 页是文档.PrintOut Range:=wdPrintFromTo, From:="1", To:="3"；打印不连续的 1、3、6 页则是文档.PrintOut Range:=wdPrintRangeOfPages, Pages:="1,3,6"。注意From、To、Pages传的都是字符串，写成数字在某些环境下会报类型不匹配，这是易错点。
4.2 批量打印文件夹下同类文件
教程给了一个很实用的批量打印示例：用Dir遍历当前文件夹下的.docx文件，逐个调PrintOut：
Sub 打印当前文件夹下的所有docx文件() ' Dir 返回第一个匹配的文件名 文件 = Dir("*.docx") Do While 文件 <> "" ' 对每个文件调用打印，FileName 传文件名 Word.Application.PrintOut FileName:=文件 文件 = Dir() ' 取下一个匹配文件 Loop End Sub这段代码的关键在Dir的两次调用：第一次带通配符启动遍历，后续不带参数取下一个。PrintOut的FileName参数直接接文件名即可，Word 会自己打开、打印、关闭。逻辑说明白之后，参数就两个：通配符决定文件类型，FileName决定打哪个。实际用的时候要注意当前目录是哪个——Dir找的是当前工作目录，不是代码所在目录，路径不对就会一个文件都匹配不到，静默结束。
4.3 在文档开头插入文本并打印
教程还有一个「在文档开头插入标题再打印」的示例，把Range构造、InsertBefore、字体设置、InsertParagraphAfter、PrintOut串成了一条完整链路：
Sub 在文档开头插入文本并打印() Set 文档 = ActiveDocument ' 构造一个位于文档开头的零长度 Range Set 范围或位置 = 文档.Range(Start:=0, End:=0) With 范围或位置 .InsertBefore "插入的标题文字" .Font.Name = "Arial" .Font.Size = 30 .InsertParagraphAfter End With 文档.PrintOut End SubRange(Start:=0, End:=0)构造的是一个零长度范围，定位在文档最开头，InsertBefore在这个位置前插入文本。InsertParagraphAfter在插入内容后补一个段落标记，避免标题和正文粘在一起。这段代码的价值在于演示了「Range 定位 → 插入 → 格式化 → 输出」的标准流程，复习时把它当模板记，换内容不换骨架。
5. 易错点清单：这五个坑不补，代码跑起来就是玄学
对象模型和参数表都过了一遍之后，真正拉开差距的是对易错点的敏感度。梳理第4季的内容，有五处最容易错或漏，每一条都值得单独记一笔。
易漏点一：Range(2,5)的结束下标是「前一个字符」。为什么漏：多数人按「包含结束位」的直觉理解区间，多选一个字符还不报错，结果文本处理结果总是差一位。怎么补：记死「左闭右开」，写完后用Range.Text打印出来核对首尾字符，养成验证习惯。
易漏点二：ActiveDocument和ThisDocument混用。为什么漏：两者在单文档场景下表现一致，一旦用户切换文档或代码放在加载项里，ActiveDocument就指向别处，ThisDocument却纹丝不动。怎么补：操作对象与代码同文档时优先ThisDocument，需要跟随用户当前焦点时才用ActiveDocument，并在注释里写明选择理由。
易漏点三：Selection的方法当成属性写。为什么漏：Selection.Copy和Selection.Copy = True在语法检查阶段不一定报错，运行时才暴露。怎么补：记住「动词开头的是方法、名词开头的是属性」，方法调用不加等号，属性赋值才加。
易漏点四：PrintOut的From/To/Pages传数字。为什么漏：参数表里没强调类型，凭直觉传整数，某些环境静默失败或报类型不匹配。怎么补：统一传字符串，From:="1"、Pages:="1,3,6"，和教程示例保持一致。
易漏点五：遍历集合时边遍历边删除或关闭。为什么漏：For i = 1 To Documents.Count在循环体内关闭文档会让 Count 变化，索引错位，漏处理或越界。怎么补：关闭类操作用For Each doc In Documents，删除类操作倒序遍历或先收集再统一处理。
提示：这五条里前三条属于「不报错但结果错」，后两条属于「运行到一半才崩」，调试成本完全不同。复习时优先把前三条变成肌肉记忆。
6. 复习落地：一张自测表加一套查漏补缺的走法
把前面几章压成可执行的复习动作，比再读一遍教程有用。下面这张自测表按「对象模型 → 成员调用 → 文档操作 → 批量处理」四段排列，每行左边是考点、右边是自测方式，能默写出来才算过。
| 考点 | 自测方式 |
|---|---|
| 三种文档引用写法及区别 | 不看笔记写出ActiveDocument/ThisDocument/Documents("名")并各举一个适用场景 |
Range起止下标规则 | 手写Range(2,5)覆盖的字符范围，用一句话解释「前一个字符」 |
| 四种文本切分粒度 | 说出Characters/Words/Sentences/Paragraphs各自返回什么对象 |
| 属性 vs 方法 | 从Bold、Copy、Count、Paste中分出属性和方法 |
SaveChanges三常量 | 写出wdSaveChanges/wdPromptToSaveChanges/wdDoNotSaveChanges的值和行为 |
PrintOut五种 Range | 写出打印当前页、起止页、指定页集合三行代码 |
| 批量打印骨架 | 默写Dir遍历 +PrintOut的完整循环 |
查漏补缺的走法建议按「先跑通再改错」的顺序来：第一步，把教程里「将数字变成红色粗体」那段原样敲一遍跑通，确认集合遍历和属性修改的链路没问题；第二步，故意把Range(2,5)改成Range(2,6)，观察输出差异，把「前一个字符」的规则刻进手感；第三步，写一个「统计当前文档段落数并弹窗」的小宏，强制自己走一遍Document.Paragraphs.Count加MsgBox的组合；第四步，拿一个含多个.docx的文件夹试批量打印，但先把PrintOut换成MsgBox 文件，确认遍历逻辑对了再接真打印，避免浪费纸。
这套走法里第三步和第四步是分水岭：能独立写出统计宏，说明对象模型已经通了；能安全地批量处理文件，说明集合遍历和边界处理过关了。至于Documents.Open那十几个参数，不用背，用到时翻教程附的参数表就行——知道「有OpenAndRepair能修损坏文档」比记住它的默认值重要得多。
从那以后我每次写 WordVBA 宏，都强制先问自己三个问题：操作对象是ActiveDocument还是ThisDocument、文本范围用Range还是Selection、集合遍历会不会边遍历边改。这三问走一遍，大部分翻车都能提前拦住。希望这份梳理帮到你，复习时少走几段弯路。
本文还有配套的精品资源，点击获取
