《VBA 之 Word 应用》,是我推出第八套教程,教程是专门讲解 VBA 在 Word 中的应用,围绕“面向对象编程”讲解,首先让大家认识 Word 中 VBA 的对象,以及对象的属性、方法,然后通过实例让大家感受到 Word VBA 的妙处 。本套教程共三册十六章,今日内容是第五章“Word 中的 Range 对象(上)”第 2 节:段落字体加粗设置及添加表格 。
![段落字体加粗设置及添加表格 字体加粗怎么设置的](http://pic.yunnanlong.com/221231/15424M408-0.jpg)
第二节 Range 对象的属性(一)
大家好,我们在上一节讲解了什么是 Range 对象,并给大家展示了 Range 对象的一些应用方案,从这节开始我们仍是从对象的属性、方法讲解,并结合一些实例来给大家讲解具体的应用 。
1 Range.Bold 属性
如果这个属性设置为 TRUE,则将 Range 范围的格式设置为加粗格式 。
语法:expression.Bold
其中 expression 为一个表示 Range 对象的变量 。
- 这个属性返回 true、false 或 wdUndefined ( true 和 False 的混合) 。可以设置为 True, False, or wdToggle.
这个属性返回或设置一个 WdCharacterCase 常量, 该常量表示指定区域中的文本的大小写 。
语法:expression. Case
其中 expression 为一个表示 Range 对象的变量 。
- 由于您选择或安装的语言支持不同(例如美国英语),上述部分常量可能无法使用 。
wdFullWidth 7 全角 。用于日文字符 。
wdHalfWidth 6 半角 。用于日文字符 。
wdHiragana 9 平假名字符 。与日文文字一起使用 。
wdKatakana 8 片假名字符 。与日文文字一起使用 。.
wdLowerCase 0 小写
wdNextCase -1 在大写、小写和句首字母大写之间切换.
wdTitleSentence 4 句首字母大写.
wdTitleWord 2 标题字大写
wdToggleCase 5 在大写和小写之间切换
wdUpperCase 1 大写
3 Range.Cells 属性
该属性返回一个 Cells 集合, 该集合代表区域中的表格单元格 。
【段落字体加粗设置及添加表格 字体加粗怎么设置的】 语法:expression.Cells
其中:expression 一个表示 Range 对象的变量 。
4 实例:段落加粗的设置及表格添加
下面我们一个实例来讲解一下上面属性的应用,我们看下面的代码:
Sub mynzA()
[代码详细见教程]
End Sub
代码截图:
![段落字体加粗设置及添加表格 字体加粗怎么设置的](http://pic.yunnanlong.com/221231/15424G612-1.jpg)
代码解读:
1)ActiveDocument.Paragraphs(1).Range.Bold = True 将当前文档第一段加粗
2)ActiveDocument.Paragraphs.Add 当前文档增加一个段落
3) Set myTable = ActiveDocument.Tables.Add(Range:=ActiveDocument.Paragraphs(ActiveDocument.Paragraphs.Count).Range, _
NumRows:=3, NumColumns:=3, DefaultTableBehavior:=wdWord9TableBehavior)
将最后的段落中添加一个 3X3 的表格 。
- WdDefaultTableBehavior 是为了指定 Microsoft Word 是否要根据表格单元格的内容自动调整其大小(“自动调整”功能)我们可以指定下面的值 。
wdWord9TableBehavior 1 启用”自动调整”功能 。
4) i = 1
For Each myce In myTable.Range.Cells
myce.Range.InsertAfter “单元格” & i
i = i + 1
Next
以上是在表格的每个单元格中插入些字符 。
我们看代码的运行结果:
![段落字体加粗设置及添加表格 字体加粗怎么设置的](http://pic.yunnanlong.com/221231/15424GY0-2.jpg)
![段落字体加粗设置及添加表格 字体加粗怎么设置的](http://pic.yunnanlong.com/221231/15424JN4-3.jpg)
今日内容回向:
推荐阅读
- 怎么调节wps表格里文字的段落布局 wps怎么把字调到正中间
- 在春节中的场面描写段落
- 如何在word文档中添加图片和表格 word字体库怎么添加
- word字体上下行间距怎么调整 word表格里的行间距怎么缩小
- 如何修改PDF文件内的文字的字体和颜色 修改pdf文件中的文字
- 微信字体怎么设置大小 iPhone快速调节字体大小的方法
- win10字体大小设置方法 win10字体大小怎么调
- win10中的字体大小设置方法 电脑屏幕字体大小怎么设置
- 段落对齐及缩进的设置 段落左右缩进字符怎么设置
- 电脑分辨率突然模糊解决方法 电脑桌面字体模糊不清怎么调