学会VBA设置Word文档字体字号：简单几步轻松掌握技巧

在Word文档中，字体字号是影响文档外观的重要因素。使用VBA（Visual Basic for Applications）可以轻松地批量设置Word文档中的字体和字号，提高工作效率。下面，我将详细介绍如何通过VBA设置Word文档的字体和字号，让你轻松掌握这一技巧。

1. 准备工作

在开始编写VBA代码之前，请确保你已经打开了Word，并且已经启用宏功能。

2. 编写VBA代码

以下是设置Word文档字体和字号的基本VBA代码：

Sub SetFontAndSize()
    Dim doc As Document
    Dim para As Paragraph
    Dim rng As Range
    
    ' 设置文档对象
    Set doc = ActiveDocument
    
    ' 遍历文档中的所有段落
    For Each para In doc.Paragraphs
        ' 设置字体和字号
        para.Range.Font.Name = "宋体"
        para.Range.Font.Size = 12
    Next para
End Sub

这段代码的作用是遍历文档中的所有段落，并将字体设置为“宋体”，字号设置为12。

3. 代码解析

Set doc = ActiveDocument：将当前激活的文档赋值给doc变量。
For Each para In doc.Paragraphs：遍历文档中的所有段落。
para.Range.Font.Name = "宋体"：将当前段落的字体设置为“宋体”。
para.Range.Font.Size = 12：将当前段落的字号设置为12。

4. 修改字体和字号

如果你需要设置不同的字体和字号，只需修改代码中的"宋体"和12即可。例如，将字体设置为“微软雅黑”，字号设置为14，代码如下：

para.Range.Font.Name = "微软雅黑"
para.Range.Font.Size = 14

5. 批量设置

如果你需要批量设置整个文档的字体和字号，可以将上述代码保存为宏，并在需要时运行。

6. 总结

通过以上步骤，你就可以轻松地使用VBA设置Word文档的字体和字号了。掌握这一技巧，可以让你在处理大量文档时更加高效。希望本文对你有所帮助！