Vba全面修改Word段落属性有效代码.docx
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
VBA修改Word段落属性有效代码 本文档介绍了使用VBA代码修改Word段落属性的有效方法。该代码可以修改Word段落的缩进、段落间距、行距、分页等属性。 一、 段落格式设定 段落格式设定是VBA代码修改Word段落属性的基础。通过使用WApp.Selection.ParagraphFormat对象,可以修改Word段落的各种属性。例如: * 左缩进:WApp.Selection.ParagraphFormat.LeftIndent = WApp.CentimetersToPoints(float.Parse(0)); * 右缩进:WApp.Selection.ParagraphFormat.RightIndent = WApp.CentimetersToPoints(float.Parse(0)); * 段前间距:WApp.Selection.ParagraphFormat.SpaceBefore = float.Parse(0); * 段后间距:WApp.Selection.ParagraphFormat.SpaceAfter = float.Parse(0); 二、 行距设定 行距设定是Word文档中非常重要的一项设置。通过使用WApp.Selection.ParagraphFormat.LineSpacingRule对象,可以修改Word文档的行距。例如: * 单倍行距:WApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle; 三、 段落对齐 段落对齐是Word文档中的一项重要设置。通过使用WApp.Selection.ParagraphFormat.Alignment对象,可以修改Word文档的段落对齐方式。例如: * 段落两端对齐:WApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify; 四、 段落格式其他设置 除了缩进、行距和对齐之外,Word文档中还有许多其他的段落格式设置。例如: * 孤行控制:WApp.Selection.ParagraphFormat.WidowControl = 0; * 与下段同页:WApp.Selection.ParagraphFormat.KeepWithNext = 0; * 段中不分页:WApp.Selection.ParagraphFormat.KeepTogether = 0; * 段前分页:WApp.Selection.ParagraphFormat.PageBreakBefore = 0; * 取消行号:WApp.Selection.ParagraphFormat.NoLineNumber = 0; * 取消段字:WApp.Selection.ParagraphFormat.Hyphenation = 1; * 首行缩进:WApp.Selection.ParagraphFormat.FirstLineIndent = WApp.CentimetersToPoints(float.Parse(0)); 五、 其他设置 除了段落格式设置之外,Word文档中还有许多其他的设置。例如: * 轮廓级别:WApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText; * 字符单位缩进:WApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse(0); * 字符单位右缩进:WApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse(0); * 字符单位首行缩进:WApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse(0); * 行单位间距:WApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse(0); * 行单位后距:WApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse(0); * 自动调整右缩进:WApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1; * 禁止行高网格:WApp.Selection.ParagraphFormat.DisableLineHeightGrid = 0; 通过使用VBA代码,可以修改Word文档的各种段落属性,从而满足不同用户的需求。
- 粉丝: 13
- 资源: 9万+
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助