WPS JSA 宏脚本入门和样例

1入门

WPS window版本才支持JSA宏的功能。 可以自动化的操作文档中的一些内容。

参考文档：

WPS API 参考文档：https://open.wps.cn/previous/docs/client/wpsLoad

微软的Word API文档：Microsoft.Office.Interop.Word 命名空间 | Microsoft Learn

有问题，基本查看上面的两个文档，再加上百度搜索，就差不多了。

2 样例

function 选择所有图片()
{var arr = [...ActiveDocument.InlineShapes];// 关闭屏幕更新,提升执行效率Application.ScreenUpdating = false;ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);arr.forEach(shape=>{shape.Range.Editors.Add(wdEditorEveryone);});ActiveDocument.SelectAllEditableRanges(wdEditorEveryone);ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);// 开启屏幕更新Application.ScreenUpdating = true;	Console.log('批量设置【图片】完成。');MsgBox("选择完毕！");
}function 选择所有表格()
{var countT =0;var i = 0;	countT = ActiveDocument.Tables.Count;//计算文档中一共包含的表格数量。Application.ScreenUpdating = 0;ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);for(i=1;i<=countT;i++){ActiveDocument.Tables.Item(i).Range.Editors.Add(wdEditorEveryone);}ActiveDocument.SelectAllEditableRanges(wdEditorEveryone);ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);Application.ScreenUpdating = 1;MsgBox("表格完成批量调整，共计"+countT+"个！");
}function 选中有底纹表的Cell(){
Application.ScreenUpdating = 0;
ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);var countT =0;var i = 0;	countT = ActiveDocument.Tables.Count;//计算文档中一共包含的表格数量。console.log("处理到表格=" + 0 + ", 总共" + countT);for(i=1;i<=countT;i++){var tableObj = ActiveDocument.Tables.Item(i);var rowNum = tableObj.Rows.Count;var colNum = tableObj.Columns.Count;
//		console.log("aaa" + rowNum + " " + colNum);for(var j=1;j<=rowNum;j++){for(var k=1; k<= colNum; k++){try {var cell = tableObj.Cell(j,k);if(cell){console.log(cell.Shading.Texture);if(cell.Shading.BackgroundPatternColor != -16777216 || cell.Shading.Texture != 0){cell.Range.Editors.Add(wdEditorEveryone);}}} catch(e) {
//					console.log("bbb");}}}if(i%2000 == 0){console.log("处理到表格=" + i + ", 总共" + countT);}}ActiveDocument.SelectAllEditableRanges(wdEditorEveryone);ActiveDocument.DeleteAllEditableRanges(wdEditorEveryone);Application.ScreenUpdating = 1;MsgBox("选择完毕！");
}/*** 修改标题和正文样式*/
function 修改标题和正文样式_标题1到标题5和正文(){var countT = 0;var paragraphT = 0;var totalT = ActiveDocument.Paragraphs.Count;// 循环获取段落信息for(var i = 1; i <= totalT; i++){paragraphT ++;// 获取每个段落范围的内容var paragraphObj = ActiveDocument.Paragraphs.Item(i);//   获取范围样式var styleName = paragraphObj.Range.Style;// 如果样式返回结果为空，则继续循环下一个if(!styleName) continue;styleName = styleName.toString();console.log(styleName);// 过滤出标题段落switch(styleName){case '标题 1': countT++;editStyle1(paragraphObj);break;case '标题 2': countT++;editStyle2(paragraphObj);break;case '标题 3': countT++;editStyle3(paragraphObj);break;case '标题 4': countT++;editStyle4(paragraphObj);break;case '标题 5': countT++;editStyle5(paragraphObj);break;case '标题 6': countT++;editStyle5(paragraphObj);break;case '标题 7': countT++;editStyle5(paragraphObj);break;case '标题 8': countT++;editStyle5(paragraphObj);break;case '标题 9': countT++;editStyle5(paragraphObj);break;case '正文': countT++;editStyle(paragraphObj);break;case '文档正文': countT++;editStyle(paragraphObj);break;case '正文': countT++;editStyle(paragraphObj);break;case '标书正文': countT++;editStyle(paragraphObj);break;case '正文缩进': countT++;editStyle(paragraphObj);break;}if(paragraphT%5000 == 0){console.log("处理进度," + paragraphT + "个, 总共："+ totalT)}}MsgBox("正文修改完毕！"+countT+"个！被修改了");
}/*** 标题1 格式*/
function editStyle1(paragraphObj){
//	console.log('标题1-' + paragraphObj.Range);// 设置字段样式 字体：小二宋体加粗；(font => {font.Blod = true;font.Size = 18;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);//设置标题段落的缩进setBiaotiSJ(paragraphObj);/*间距：段前段后：6磅；行距：1.5倍。*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 6;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 6;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}/*** 标题2 格式*/
function editStyle2(paragraphObj){console.log('111' + paragraphObj.Range);paragraphObj.Range.Select();// 三号宋体加粗；(font => {font.Blod = true;font.Size = 16;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);/*段落的对齐方式 对齐方式：左对齐；*/paragraphObj.Alignment = wdAlignParagraphLeft;/*大纲级别：2级；*/paragraphObj.OutlineLevel = wdOutlineLevel2;//设置标题段落的缩进setBiaotiSJ(paragraphObj);//	paragraphObj.CharacterUnitFirstLineIndent = 0；
//	paragraphObj.IndentCharWidth(0);/*间距：段前段后：6磅；行距：1.5倍。*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 6;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 6;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}/**
* 设置标题段落的缩进
*/
function setBiaotiSJ(paragraphObj){/*左侧、右侧：0字符；特殊格式：首行缩进，2字符*//* 该属性返回或设置指定段落的左缩进量（以字符为单位） */if(paragraphObj.LeftIndent != 0){paragraphObj.LeftIndent = 0;}if(paragraphObj.CharacterUnitLeftIndent != 0){paragraphObj.CharacterUnitLeftIndent = 0}
//	/* 该属性返回或设置指定段落的右缩进量（以字符为单位） */if(paragraphObj.RightIndent != 0){paragraphObj.RightIndent = 0;}if(paragraphObj.CharacterUnitRightIndent != 0){paragraphObj.CharacterUnitRightIndent = 0}/*设置首行缩进*/if(paragraphObj.FirstLineIndent != 0){paragraphObj.FirstLineIndent = 0;}if(paragraphObj.CharacterUnitFirstLineIndent != 0){paragraphObj.CharacterUnitFirstLineIndent = 0;}if(paragraphObj.LeftIndent != 0){paragraphObj.LeftIndent = 0;}if(paragraphObj.CharacterUnitLeftIndent != 0){paragraphObj.CharacterUnitLeftIndent = 0}
//	/* 该属性返回或设置指定段落的右缩进量（以字符为单位） */if(paragraphObj.RightIndent != 0){paragraphObj.RightIndent = 0;}if(paragraphObj.CharacterUnitRightIndent != 0){paragraphObj.CharacterUnitRightIndent = 0}/*设置首行缩进*/if(paragraphObj.FirstLineIndent != 0){paragraphObj.FirstLineIndent = 0;}if(paragraphObj.CharacterUnitFirstLineIndent != 0){paragraphObj.CharacterUnitFirstLineIndent = 0;}
}/*** 标题3 格式*/
function editStyle3(paragraphObj){// console.log('111' + paragraphObj.Range);// 小三宋体加粗；(font => {font.Blod = true;font.Size = 15;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);/*段落的对齐方式 对齐方式：左对齐；*/paragraphObj.Alignment = wdAlignParagraphLeft;/*大纲级别：3级；*/paragraphObj.OutlineLevel = wdOutlineLevel3;//设置标题段落的缩进setBiaotiSJ(paragraphObj);/*间距：段前段后：6磅；行距：1.5倍。*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 6;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 6;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}/*** 标题4 格式*/
function editStyle4(paragraphObj){// console.log('111' + paragraphObj.Range);// 四号宋体加粗；(font => {font.Blod = true;font.Size = 14;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);/*段落的对齐方式 对齐方式：左对齐；*/paragraphObj.Alignment = wdAlignParagraphLeft;/*大纲级别：4级；*/paragraphObj.OutlineLevel = wdOutlineLevel4;//设置标题段落的缩进setBiaotiSJ(paragraphObj);/*间距：段前段后：6磅；行距：1.5倍。*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 6;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 6;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}/*** 标题5 格式*/
function editStyle5(paragraphObj){// console.log('111' + paragraphObj.Range);// 小四宋体加粗；(font => {font.Blod = true;font.Size = 12;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);/*段落的对齐方式 对齐方式：左对齐；*/paragraphObj.Alignment = wdAlignParagraphLeft;/*大纲级别：5级；注释掉， 5、6、7、8、9 公用这个函数*/// paragraphObj.OutlineLevel = wdOutlineLevel5;//设置标题段落的缩进setBiaotiSJ(paragraphObj);/*间距：段前段后：6磅；行距：1.5倍。*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 6;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 6;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}/*** 修改样式*/
function editStyle(paragraphObj){// console.log('333' + paragraphObj.Range);
// 中文：宋体 小四号, 西文：Times New Roman 小四号(font => {
//		font.Blod = false;font.Size = 12;font.Name = "宋体";font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);/*段落的对齐方式 对齐方式：左对齐；*/paragraphObj.Alignment = wdAlignParagraphLeft;/*大纲级别：正文*/paragraphObj.OutlineLevel = wdOutlineLevelBodyText;/*左侧、右侧：0字符；特殊格式：首行缩进，2字符*//* 该属性返回或设置指定段落的左缩进量（以字符为单位） */paragraphObj.LeftIndent = 0;/* 该属性返回或设置指定段落的右缩进量（以字符为单位） */paragraphObj.RightIndent = 0;/*设置首行缩进*/paragraphObj.CharacterUnitFirstLineIndent  = 2;/*段前段后：0行；行距：1.5倍；*/(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 0;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 0;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);
}function 所有表格上面添加表标题(){var countT =0;var i = 0;	countT = ActiveDocument.Tables.Count;//计算文档中一共包含的表格数量。console.log("处理到表格=" + 0 + ", 总共" + countT);var firstEmpty = false;for(i=1;i<=countT;i++){var tableObj = ActiveDocument.Tables.Item(i);
//		tableObj.Range.InsertParagraphBefore()
//	tableObj.Range.InsertBefore("Introduction")var rangeObj = tableObj.Range;var beforeRangeObj = rangeObj.Previous(wdParagraph, 1);if (!beforeRangeObj) {firstEmpty = true;//beforeRangeObj = Application.ActiveDocument.Paragraphs.Add(ActiveDocument.Paragraphs.Item(1).Range).RangebeforeRangeObj = Application.ActiveDocument.Range(0, 0)beforeRangeObj.InsertParagraph()}var paA = beforeRangeObj.Paragraphs.Item(1);console.log("000-" + paA.Alignment + "-" +wdAlignParagraphCenter) ;console.log(paA.Range.Text.length);console.log("222=" + paA.Range.Text);paA.Range.Select();//如果上段有居中，且长度大于2 就表名不处理if(paA.Alignment == wdAlignParagraphCenter && paA.Range.Text.length > 2){console.log("44444");} else {console.log("33333");
//    	    beforeRangeObj.Select();//	 rangeObj.Collapse(wdCollapseStart)//        beforeRangeObj.InsertParagraphAfter()beforeRangeObj.Collapse(wdCollapseEnd)//网上移动一个字符的位置beforeRangeObj.MoveEnd(wdCharacter, -1);//        beforeRangeObj.InsertParagraphAfter()if(firstEmpty){firstEmpty = false;} else {beforeRangeObj.InsertParagraph()}beforeRangeObj.InsertAfter("表 xxx");}var lastParagraph = beforeRangeObj.Paragraphs.Item(beforeRangeObj.Paragraphs.Count);
//    lastParagraph.Range.Select();changeStyleBBT(lastParagraph);if(i%2000 == 0){console.log("处理到表格=" + i + ", 总共" + countT);}}MsgBox("选择完毕！");
}/**
* 表标题样式设置
**/
function changeStyleBBT(paragraphObj){/*段落的对齐方式 对齐方式：居中；*/paragraphObj.Alignment = wdAlignParagraphCenter;// 宋体 五号 加粗(font => {font.Blod = true;font.Size = 10.5;//5号字font.Name = "宋体";
//		font.NameAscii = 'Times New Roman';})(paragraphObj.Range.Font);//段前段后：0行；行距：1.5行距；(obj=>{/*本示例将活动文档中所有段落的段前间距设置为 6 磅。*/obj.SpaceBefore = 0;/*本示例将活动文档中所有段落的段后间距设置为 6 磅。*/obj.SpaceAfter = 0;/*为指定段落设置 1.5 倍行距。*/obj.LineSpacingRule = wdLineSpace1pt5;})(paragraphObj.Range.ParagraphFormat);changeStyleBBT_CJ(paragraphObj);
}/**
* 表标题样式缩进
*/
function changeStyleBBT_CJ(paragraphObj){/*左侧、右侧：0字符；特殊格式：首行缩进，2字符*//* 该属性返回或设置指定段落的左缩进量（以字符为单位） */if(paragraphObj.LeftIndent != 0){paragraphObj.LeftIndent = 0;}if(paragraphObj.CharacterUnitLeftIndent != 0){paragraphObj.CharacterUnitLeftIndent = 0}
//	/* 该属性返回或设置指定段落的右缩进量（以字符为单位） */if(paragraphObj.RightIndent != 0){paragraphObj.RightIndent = 0;}if(paragraphObj.CharacterUnitRightIndent != 0){paragraphObj.CharacterUnitRightIndent = 0}/*设置首行缩进*/if(paragraphObj.FirstLineIndent != 0){paragraphObj.FirstLineIndent = 0;}if(paragraphObj.CharacterUnitFirstLineIndent != 0){paragraphObj.CharacterUnitFirstLineIndent = 0;}if(paragraphObj.LeftIndent != 0){paragraphObj.LeftIndent = 0;}if(paragraphObj.CharacterUnitLeftIndent != 0){paragraphObj.CharacterUnitLeftIndent = 0}
//	/* 该属性返回或设置指定段落的右缩进量（以字符为单位） */if(paragraphObj.RightIndent != 0){paragraphObj.RightIndent = 0;}if(paragraphObj.CharacterUnitRightIndent != 0){paragraphObj.CharacterUnitRightIndent = 0}/*设置首行缩进*/if(paragraphObj.FirstLineIndent != 0){paragraphObj.FirstLineIndent = 0;}if(paragraphObj.CharacterUnitFirstLineIndent != 0){paragraphObj.CharacterUnitFirstLineIndent = 0;}
}

3 录制脚本

如果有些API搜索不到，可以通过录制脚本，看看WPS生成的脚本是怎么写的。