通过如下的VBA代码调用Paragraphs、Paragraph对象,可以操作word文档的段落、字符间距、段落格式的设置等。希望对您有所帮助。
Selection.Paragraphs.Count '返回所选区域的段落数
Selection.Paragraphs.First '返回所选区域中的第一段
ActiveDocument.Paragraphs(1).LeftIndent '返回当前文档中第一段的左缩进值
ActiveDocument.Paragraphs(1).LineSpacing '返回当前文档中第一段的行距
ActiveDocument.Paragraphs(1).OutlineLevel ‘返回或设置当前文档中第一段的大纲级别
ActiveDocument.Paragraphs(1).RightIndent ‘返回当前文档中第一段的右缩进量
ActiveDocument.Paragraphs(1).SpaceBefore '返回当前文档中第一段的段前间距
ActiveDocument.Paragraphs(1).SpaceAfter ‘返回当前文档中第一段的段后间距
ActiveDocument.Paragraphs(1).Range.Text '返回当前文档中第一段的内容
ActiveDocument.Paragraphs(1).Range.Style.NameLocal '返回当前文档中第一段应用的样式名
ActiveDocument.Paragraphs(1).Range.Style.Description '返回当前文档中第一段所应用样式的详细描述
ActiveDocument.Paragraphs(1).Range.Style.Font.Name '返回当前文档中第一段所应用样式的字体名
ActiveDocument.Paragraphs(1).Range.Style.Font.NameFarEast '返回或设置一种东亚字体名
ActiveDocument.Paragraphs(1).Range.Style.Font.Size '返回或设置当前文档中第一段所应用样式的字体大小
ActiveDocument.Paragraphs(1).Range.Style.Font.Spacing '返回或设置字符间距
Selection.Words.Count '所选区域的字数
以上代码仅针对有一定基础的word用户使用。