外贸网站源码多语言,济南企业如何建网站,网站建设运营费用,园林公司网站模板该篇讲解下word文档中的标题和正文批量修改样式#xff0c;如下图#xff1a; 前面一篇已讲解了WPS Office宏编辑器操作方法#xff0c;这里不细讲了#xff0c;如有不清楚可以查看该篇#xff1a;https://blog.csdn.net/jiciqiang/article/details/134653657?spm1001.20… 该篇讲解下word文档中的标题和正文批量修改样式如下图 前面一篇已讲解了WPS Office宏编辑器操作方法这里不细讲了如有不清楚可以查看该篇https://blog.csdn.net/jiciqiang/article/details/134653657?spm1001.2014.3001.5501文章浏览阅读363次。WPS Office JS宏实现Word表格样式批量修改。 由于本职工作原因经常会用到office办公软件经常很多内容审批后需要统一修改内容或样式如果Word文档中有上百页或上千页则一个一个修改太麻烦了。在接触到WPSJS宏后发现工作效率大大提升如果你会前端开发有JS基础上手会非常快如果有VBA基础就更得心应手了因为对象和函数定义基础是沿用office的VBA。其他不多说了先和大家分享下如果统一修改表格样式。https://blog.csdn.net/jiciqiang/article/details/134653657?spm1001.2014.3001.5501
一、修改标题
1.1 Paragraphs 对象 在编写代码前咱们先了解下Paragraphs对象的属性和方法。
方法
名称说明1Add返回一个 Paragraph 对象该对象代表添加到文档中的新的空白段落。2Indent为一个或多个段落增加一个级别的缩进。3IndentFirstLineCharWidth将一个或多个段落的首行缩进指定的字符数。
属性
名称说明1AddSpaceBetweenFarEastAndAlpha如果 WPS 将自动在指定段落的日文和拉丁文文字之间添加空格则该属性值为 True。如果仅对于某些指定段落将该属性设置为 True则该属性会返回 wdUndefined。Long 类型可读写。2AddSpaceBetweenFarEastAndDigit如果 WPS 将自动在指定段落的日文文字和数字之间添加空格则该属性值为 True。如果仅对于某些指定段落将该属性设置为 True则该属性会返回 wdUndefined。Long 类型可读写。3Alignment 返回或设置一个 WdParagraphAlignment 常量该常量代表指定段落的对齐方式可读写。4Application返回一个代表 WPS 应用程序的 Application 对象。5AutoAdjustRightIndent如果 WPS 会根据您指定的每行字符数自动调整指定段落的右缩进则该属性值为 True。如果只将某些指定段落的 AutoAdjustRightIndent 属性设置为 True则该属性会返回 wdUndefined。Long 类型可读写。6BaseLineAlignment返回或设置一个 WdBaselineAlignment 常量该常量代表行中字体的垂直位置可读写。7Borders返回一个 Borders 集合该集合代表指定对象的所有边框。8CharacterUnitFirstLineIndent返回或设置首行或悬挂缩进的值以字符为单位。用正值设置首行缩进用负值设置悬挂缩进。Single 类型可读写。9CharacterUnitLeftIndent该属性返回或设置指定段落的左缩进量以字符为单位。Single 类型可读写。10CharacterUnitRightIndent该属性返回或设置指定段落的右缩进量以字符为单位。Single 类型可读写。11Count返回一个 Long 类型的值该值代表集合中的段数。只读。12Creator返回一个 32 位整数该整数代表在其中创建特定对象的应用程序。只读 Long 类型。13DisableLineHeightGrid如果该属性的值为 True则当指定每页的行数时WPS 会将指定段落中的字符与行网格对齐。如果只将某些指定段落的 DisableLineHeightGrid 属性设置为 True则返回 wdUndefined。Long 类型可读写。14FarEastLineBreakControl如果为 True则 WPS 会将东亚语言文字的换行规则应用于指定的段落。如果只将某些指定段落的 FarEastLineBreakControl 属性设定为 True则返回 wdUndefined。Long 类型可读写。15First返回一个 Paragraph 对象该对象代表在 Paragraphs 集合中的第一个项目。16FirstLineIndent返回或设置首行缩进或悬挂缩进的大小以磅值表示。用正数设置首行缩进的尺寸用负数设置悬挂缩进的尺寸。Single 类型可读写。17Format 返回或设置一个 ParagraphFormat 对象该对象代表指定的一个或多个段落的格式。18HalfWidthPunctuationOnTopOfLine如果为 True则 WPS 会将指定段落行首的标点符号改为半角字符。如果仅将某些指定段落的该属性设置为 True则此属性将返回 wdUndefined。Long 类型可读写。19HangingPunctuation 如果为 True则指定段落中的标点将可以溢出边界。如果仅将某些指定段落的该属性设置为 True则返回 wdUndefined。Long 类型可读写。20Hyphenation如果指定的段落进行自动断字则该属性值为 True。如果指定的段落不进行自动断字则该属性值为 False。可读写 Long 类型。21KeepTogether在 WPS 对文档重新分页时如果指定段落中的所有行都位于同一页上则该属性值为 True。可读写 Long 类型。22KeepWithNext在 WPS 对文档重新分页时如果指定段落与其下一段位于同一页上则该属性值为 True。可读写 Long 类型。23Last返回一个 Paragraph 对象该对象代表段落集合中的最后一个项目。24LeftIndent返回或设置一个 Single 类型的值该值代表指定段落的左缩进值以磅为单位。可读写。25LineSpacing返回或设置指定段落的行距以磅为单位。Single 类型可读写。26LineSpacingRule返回或设置指定段落的行距。可读写 WdLineSpacing 类型。27LineUnitAfter返回或设置指定段落的段后间距以网格线为单位。可读写 Single 类型。28LineUnitBefore返回或设置指定段落的段前间距以网格线为单位。可读写 Single 类型。29NoLineNumber如果取消指定段的行号则该属性值为 True。该属性值可以是 True、False 或 wdUndefined。可读写 Long 类型。30OutlineLevel返回或设置指定段落的大纲级别。可读写 WdOutlineLevel 类型。31PageBreakBefore如果在指定段落前插入了分页符则该属性值为 True。该属性值可以是 True、False 或 wdUndefined。可读写 Long 类型。32Parent返回一个 Object 类型值该值代表指定 Paragraphs 对象的父对象。33ReadingOrder返回或设置指定段落的读取次序而不改变其对齐方式。可读写 WdReadingOrder 类型。34RightIndent返回或设置指定段落的右缩进量以磅为单位。可读写 Single 类型。35Shading返回一个 Shading 对象该对象代表指定段落的底纹格式。36SpaceAfter返回或设置指定段落或文本栏后面的间距以磅为单位。可读/写 Single 类型。37SpaceAfterAuto如果 WPS 自动设置指定段落的段后间距则该属性为 True。可读/写 Long 类型。38SpaceBefore返回或设置指定段落的段前间距以磅为单位。可读/写 Single 类型。39SpaceBeforeAuto如果 WPS 自动设置指定段落的段前间距则该属性为 True。可读/写 Long 类型。40Style返回或设置指定段落的样式。可读写 Variant 类型。41TabStops返回或设置一个 TabStops 集合该集合代表指定段落中的所有自定义制表位。可读写。42WidowControl在 WPS 对文档重新分页时如果指定段落的首行和末行与段落的其他各行同页则该属性值为 True。该属性值可以是 True、False 或 wdUndefined。可读写 Long 类型。43WordWrap如果 WPS 在指定段落中的西文单词中间断字换行则该属性值为 True。可读写 Long 类型。
1.2 获取内容段落数 上篇讲过表格获取数量是通过Count属性这里同样是通过Count获取内容的段落数代码如下
/*** 修改标题和正文样式*/
function 修改标题和正文样式(){console.log(ActiveDocument.Paragraphs.Count);
}
输出结果如下图 1.3 获取段落样式 这里得到段落数后我们则可以循环获取所有段落内容并通过段落属性Style判断出标题部分进行样式调整。代码如下
/*** 修改标题和正文样式*/
function 修改标题和正文样式(){// 循环获取段落信息for(var i 1; i ActiveDocument.Paragraphs.Count; i){// 获取每个段落范围的内容var rangeObj ActiveDocument.Paragraphs.Item(i).Range;// console.log(rangeObj.Style.toString());}}
输出结果 如上图所示很容易判断出哪些范围为标题哪些为正文。当然有时会出现返回样式值为空情况这里则需要做下容错处理代码如下
/*** 修改标题和正文样式*/
function 修改标题和正文样式(){// 循环获取段落信息for(var i 1; i ActiveDocument.Paragraphs.Count; i){// 获取每个段落范围的内容var rangeObj ActiveDocument.Paragraphs.Item(i).Range;// 获取范围样式var styleName rangeObj.Style;// 如果样式返回结果为空则继续循环下一个if(!styleName) continue;styleName styleName.toString();console.log(styleName);}
}
1.4 过滤出标题段落 现在通过switch来过滤出对应的标题段落内容另外不同文档中标题样式名不一定叫“标题 1”、“标题 2” 等根据分析出的数据作对应调整即可。这里只到2级标题所以不作过深层次筛选代码如下
/*** 修改标题和正文样式*/
function 修改标题和正文样式(){// 循环获取段落信息for(var i 1; i ActiveDocument.Paragraphs.Count; i){// 获取每个段落范围的内容var rangeObj ActiveDocument.Paragraphs.Item(i).Range;// 获取范围样式var styleName rangeObj.Style;// 如果样式返回结果为空则继续循环下一个if(!styleName) continue;styleName styleName.toString();// 过滤出标题段落switch(styleName){case 标题 1: console.log(styleName);break;case 标题 2: console.log(styleName);break;case 标题 3: console.log(styleName);break;}}
}
输出结果 1.5 增加修改样式函数 这里增加一个修改样式的单独功能函数这是因为减少代码冗余量代码如下
/*** 修改样式*/
function editStyle(rangeObj, name, size){// 选择当前内容rangeObj.Select();// 设置字段样式(font {font.Size size;font.Name name;font.Blod true;})(Selection.Font);
}
1.6 修改标题样式 前期准备工作做完后现在则可以正式修改标题样式了代码如下
/*** 修改样式*/
function editStyle(rangeObj, name, size){// 选择当前内容rangeObj.Select();// 设置字段样式(font {font.Size size;font.Name name;font.Blod true;})(Selection.Font);
}/*** 修改标题和正文样式*/
function 修改标题和正文样式(){// 循环获取段落信息for(var i 1; i ActiveDocument.Paragraphs.Count; i){// 获取每个段落范围的内容var rangeObj ActiveDocument.Paragraphs.Item(i).Range;// 获取范围样式var styleName rangeObj.Style;// 如果样式返回结果为空则继续循环下一个if(!styleName) continue;// styleName styleName.toString();// 过滤出标题段落switch(styleName){case 标题 1: editStyle(rangeObj, 黑体, 16);break;case 标题 2: editStyle(rangeObj, 楷体, 16);break;case 标题 3: editStyle(rangeObj, 仿宋, 14);break;}}
} 点击运行宏如下图 运行结束后查看文档则标题根据设置样式修改完成了如下图 二、修改正文 这里细心朋友可能就发现了修改“正文”内容就很简单了直接在switch中增加一个case判断即可代码如下
/*** 修改标题和正文样式*/
function 修改标题和正文样式(){// 循环获取段落信息for(var i 1; i ActiveDocument.Paragraphs.Count; i){// 获取每个段落范围的内容var rangeObj ActiveDocument.Paragraphs.Item(i).Range;// 获取范围样式var styleName rangeObj.Style;// 如果样式返回结果为空则继续循环下一个if(!styleName) continue;//styleName styleName.toString();// 过滤出标题段落switch(styleName){case 标题 1: editStyle(rangeObj, 黑体, 16);break;case 标题 2: editStyle(rangeObj, 楷体, 16);break;case 标题 3: editStyle(rangeObj, 仿宋, 14);break;case 正文: editStyle(rangeObj, 宋体, 12);break;}}
}
运行结束后标题和样式都根据代码中设定的样式进行更新了文档效果如下
文章转载自： http://www.morning.yrbp.cn.gov.cn.yrbp.cn http://www.morning.qblcm.cn.gov.cn.qblcm.cn http://www.morning.sffwz.cn.gov.cn.sffwz.cn http://www.morning.rrms.cn.gov.cn.rrms.cn http://www.morning.qygfb.cn.gov.cn.qygfb.cn http://www.morning.rxxdk.cn.gov.cn.rxxdk.cn http://www.morning.wqbrg.cn.gov.cn.wqbrg.cn http://www.morning.zfzgp.cn.gov.cn.zfzgp.cn http://www.morning.rqgjr.cn.gov.cn.rqgjr.cn http://www.morning.tlrxp.cn.gov.cn.tlrxp.cn http://www.morning.fbylq.cn.gov.cn.fbylq.cn http://www.morning.jxdhc.cn.gov.cn.jxdhc.cn http://www.morning.mbnhr.cn.gov.cn.mbnhr.cn http://www.morning.zrjzc.cn.gov.cn.zrjzc.cn http://www.morning.gediba.com.gov.cn.gediba.com http://www.morning.rkjz.cn.gov.cn.rkjz.cn http://www.morning.chhhq.cn.gov.cn.chhhq.cn http://www.morning.mzhh.cn.gov.cn.mzhh.cn http://www.morning.yqkmd.cn.gov.cn.yqkmd.cn http://www.morning.cfynn.cn.gov.cn.cfynn.cn http://www.morning.nfmtl.cn.gov.cn.nfmtl.cn http://www.morning.ryztl.cn.gov.cn.ryztl.cn http://www.morning.pwbps.cn.gov.cn.pwbps.cn http://www.morning.yhrfg.cn.gov.cn.yhrfg.cn http://www.morning.gl-group.cn.gov.cn.gl-group.cn http://www.morning.rxwfg.cn.gov.cn.rxwfg.cn http://www.morning.qfmns.cn.gov.cn.qfmns.cn http://www.morning.bwttp.cn.gov.cn.bwttp.cn http://www.morning.cpgdy.cn.gov.cn.cpgdy.cn http://www.morning.lbywt.cn.gov.cn.lbywt.cn http://www.morning.kngx.cn.gov.cn.kngx.cn http://www.morning.fplwz.cn.gov.cn.fplwz.cn http://www.morning.mhcys.cn.gov.cn.mhcys.cn http://www.morning.hwbmn.cn.gov.cn.hwbmn.cn http://www.morning.dmzzt.cn.gov.cn.dmzzt.cn http://www.morning.ccpnz.cn.gov.cn.ccpnz.cn http://www.morning.qynnw.cn.gov.cn.qynnw.cn http://www.morning.gkpgj.cn.gov.cn.gkpgj.cn http://www.morning.gqjzp.cn.gov.cn.gqjzp.cn http://www.morning.khyqt.cn.gov.cn.khyqt.cn http://www.morning.pxwjp.cn.gov.cn.pxwjp.cn http://www.morning.dlmqn.cn.gov.cn.dlmqn.cn http://www.morning.qbdsx.cn.gov.cn.qbdsx.cn http://www.morning.baguiwei.com.gov.cn.baguiwei.com http://www.morning.sbrxm.cn.gov.cn.sbrxm.cn http://www.morning.sthgm.cn.gov.cn.sthgm.cn http://www.morning.tsynj.cn.gov.cn.tsynj.cn http://www.morning.yrsg.cn.gov.cn.yrsg.cn http://www.morning.5-73.com.gov.cn.5-73.com http://www.morning.hfbtt.cn.gov.cn.hfbtt.cn http://www.morning.fkfyn.cn.gov.cn.fkfyn.cn http://www.morning.jkbqs.cn.gov.cn.jkbqs.cn http://www.morning.wxccm.cn.gov.cn.wxccm.cn http://www.morning.rnmdp.cn.gov.cn.rnmdp.cn http://www.morning.gybnk.cn.gov.cn.gybnk.cn http://www.morning.hdrsr.cn.gov.cn.hdrsr.cn http://www.morning.mcwgn.cn.gov.cn.mcwgn.cn http://www.morning.dwwbt.cn.gov.cn.dwwbt.cn http://www.morning.kqxng.cn.gov.cn.kqxng.cn http://www.morning.yjknk.cn.gov.cn.yjknk.cn http://www.morning.lxqkt.cn.gov.cn.lxqkt.cn http://www.morning.rkwlg.cn.gov.cn.rkwlg.cn http://www.morning.rqqct.cn.gov.cn.rqqct.cn http://www.morning.rhmt.cn.gov.cn.rhmt.cn http://www.morning.hlmkx.cn.gov.cn.hlmkx.cn http://www.morning.dfygx.cn.gov.cn.dfygx.cn http://www.morning.cljpz.cn.gov.cn.cljpz.cn http://www.morning.mrnnb.cn.gov.cn.mrnnb.cn http://www.morning.drytb.cn.gov.cn.drytb.cn http://www.morning.jwtwf.cn.gov.cn.jwtwf.cn http://www.morning.xcfmh.cn.gov.cn.xcfmh.cn http://www.morning.bfycr.cn.gov.cn.bfycr.cn http://www.morning.fpczq.cn.gov.cn.fpczq.cn http://www.morning.qkqjz.cn.gov.cn.qkqjz.cn http://www.morning.qzpkr.cn.gov.cn.qzpkr.cn http://www.morning.c7513.cn.gov.cn.c7513.cn http://www.morning.qxnlc.cn.gov.cn.qxnlc.cn http://www.morning.bmfqg.cn.gov.cn.bmfqg.cn http://www.morning.sqfrg.cn.gov.cn.sqfrg.cn http://www.morning.xgmf.cn.gov.cn.xgmf.cn
