当前位置: 首页 > news >正文

自己做刷东西的网站天门网站建设

自己做刷东西的网站,天门网站建设,html网站地图制作,做网站税费1入门 WPS window版本才支持JSA宏的功能。 可以自动化的操作文档中的一些内容。 参考文档: WPS API 参考文档:https://open.wps.cn/previous/docs/client/wpsLoad 微软的Word API文档:Microsoft.Office.Interop.Word 命名空间 | Microsoft …

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生成的脚本是怎么写的。

http://www.ds6.com.cn/news/115351.html

相关文章:

  • 如何做好商务网站的运营怎么做网络服务商电话
  • 最好网站建设公司制作平台网络seo首页
  • 号码百事通给做网站吗惠州网站seo排名优化
  • 阿里云外贸建站广州seo招聘网
  • 网站集群建设相关的招标seo优化推广流程
  • 网上做游戏任务赚钱的网站学市场营销后悔死了
  • 怎么做qq盗号网站seo快速排名服务
  • 浙江城乡建设网站如何做网站搜索引擎优化
  • 金华app网站开发seo技术介绍
  • 企业网站管理系统模板如何自己开网站
  • 项目推广平台排行榜衡阳seo优化报价
  • 南阳网站排名优化报价青岛seo推广专员
  • 蘑菇丁毕业设计网站昆山网站建设推广
  • 做一张网站图多少钱软文写作300字
  • 网站开发报价表的文档成都网站快速开发
  • 网站建设开发综合实训报告全国疫情最新消息
  • 外贸网络推广怎样做武汉seo服务多少钱
  • seo建设网站如何去做网络推广
  • 如何帮客户做网站2022推广app赚佣金平台
  • 网络规划设计师考纲教材改版新旧对比宁波正规站内优化seo
  • 做网站实训心得线下营销方式主要有哪些
  • 郑州高端网站开发3分钟搞定网站seo优化外链建设
  • 信誉好的唐山网站建设百度图像搜索
  • 现在还有用dw做网站百度关键词排名联系方式
  • 做网站推广的工作内容郑州seo外包公司哪家好
  • 产品设计公司规划seo关键词排名优化技巧
  • 苏州刚刚发生大事件淘宝关键词优化怎么弄
  • 甘肃省水利厅引洮工程建设管理局网站广告投放的方式有哪些
  • 服务公司口号网络seo优化平台
  • 广东哪家网站建设网页设计服务百度关键词快速排名方法