WORD文档段落属性设置常数一览
编辑：madmlwt
一、段落对齐方式Alignment 属性常量及赋值一览
常量 | 名称描述 | 赋值 |
wdAlignParagraphCenter | 居中 | 1 |
wdAlignParagraphDistribute | 分散对齐 | 4 |
wdAlignParagraphJustify | 等同效果左对齐 | 3 |
wdAlignParagraphJustifyHi | 秦朝建立的时间 等同效果左对齐 | 7 |
wdAlignParagraphJustifyLow | 等同效果左对齐 | 8 |
wdAlignParagraphJustifyMed | 等同效果左对齐 | 5 |
wdAlignParagraphLeft | 左对齐(两端对齐) | 0 |
wdAlignParagraphRight | 右对齐 | 2 |
wdAlignParagraphThaiJustify | 等同效果左对齐 | 9 |
| | |
说明
积极沟通由于您选择或安装的语言支持（例如，英语（美国））不同，上述部分常量可能无法使用。
二、应用实例
把WORD文档的第一段落(标题)进行格式(字体和对齐)设置。
1．直接在WORD文档中应用
Sub 段落设置()
With ActiveDocument.Paragraphs(1).Range
.Bold = True '将标题设为粗体
.ParagraphFormat.Alignment = wdAlignParagraphCenter '标题居中
1亩多少平方米 .Font.Name = "隶书" '标题字体
.Font.Size = 18 '标题字号
End With
End Sub
2．在宝宝上火怎么办EXCEL中操作WORD文档
Sub 段落设置()
陕西特色美食小吃Application.ScreenUpdating = Fal '关闭屏幕刷新
dqM = ThisWorkbook.Path & "\操作WORD表格.doc" '要打开的WORD文件
Set wdWORD = CreateObject("Word.Application") '定义一个Word对象变量淋过雨的空气
Set wdDOC = wdWORD.Documents.Open(dqM) '创建文档对象便宜平板电脑
With wdWORD
With .ActiveDocument.Paragraphs(1).Range'确定第一个段落对象
.Font.Size = 18 '字号
.Font.Name = "隶书" '字体
.Font.Bold = True '加粗
.ParagraphFormat.Alignment = 1 '水平居中
晨字五行
End With
.ActiveDocument.SaveAs'保存修改
.Quit '关闭窗口
End With
Set wdDOC = Nothing '释放存储空间
Set wdWORD = Nothing '释放存储空间
Application.ScreenUpdating = Fal '关闭屏幕刷新
End Sub
说明：
本代码采用后期绑定，不必在对象库中去勾选Microsoft Word 11.0 Object Library对象。所以段落的水平居中代码用值1替代了wdAlignParagraphCenter常量。
下一篇请关注《WORD 文档内置属性设置常数一览》
