Sub mynzD()
‘为活动文档的首段设置 1 英寸的首行缩进 。
ActiveDocument.Paragraphs(1).FirstLineIndent = InchesToPoints(1)
‘为活动文档的第二段设置 0.5 英寸的悬挂缩进 。
ActiveDocument.Paragraphs(2).FirstLineIndent = InchesToPoints(-0.5)
End Sub
代码截图:

代码解读:(略)
代码的运行,在代码运行前,我们先看看界面的截图:

代码运行后:

今日内容回向:
1 段落对象的 Alignment 属性及 CharacterUnitFirstLineIndent 属性、CharacterUnitLeftIndent 属性、CharacterUnitRightIndent 属性、FirstLineIndent 属性的意义是什么?
2 如何利用上述属性设置文档的段落?
本讲内容参考程序文件:Doc 004 文档.docm

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

推荐阅读
- 宽带连接错误691原因及解决方法 691宽带错误代码怎么解决
- 文件无法删除的原因及解决办法 删除文件没有权限怎么办
- 电脑无故重启原因及解决办法生活常识 自动重启电脑怎么回事
- 打印机常见故障及对应的解决方法 无法删除打印机设备怎么办
- 钢结构工程施工及验收规范是什么
- 手机卡屏及跳屏的解决办法 苹果手机屏幕一闪一闪的怎么回事
- 枇杷蜂蜜养生有什么功效以及禁忌
- 电脑黑屏重装系统的步骤及图解 无法开机怎么重装系统
- 鹅肉的功效与作用及禁忌有哪些
- 佳能彩色打印机价格是多少 佳能彩色打印机型号及价格
