如何使用WPS的JS宏实现Word表格的自动编号

如何使用WPS的JS宏实现Word表格的自动编号?如下图,想要给表格的编号列中添加序号。

使用WPS的JS宏可以实现自动编号,代码如下:

复制代码
n = Selection.Tables.Item(1).Rows.Count;
		for(i = 2;i<=n;i++)
		{
			Selection.Tables.Item(1).Cell(i,1).Range.Text = Selection.Tables.Item(1).Cell(i,1).RowIndex-1;
			Selection.Tables.Item(1).Cell(i,1).Range.Style = "表";
			Selection.Tables.Item(1).Cell(i,1).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter;
		}	

上述代码,

n表示获取当前表格的行数。

从第二行开始,设定表格单元的文本为:行号-1

并设定文本的样式为"表";

设定文本编号的文字样式为:居中。

上述代码,适合大量表格的模式。如果只需要处理一个表格的编号,那么直接使用Excel表进行编号设定好之后,拷贝到Word表格中,也可以。

运行之后,可以得到如下的表格:

相关推荐
letian88081 天前
WPS2026专业增强版!一键安装,自动授权,内置VBA组件!
wps
Jo乔戈里1 天前
Windows系统弹窗自动点否?问题可能在WPS
wps
hPw0eKIqD3 天前
使用二次封装的Excel COM 组件操作Excel\WPS ET中的区域、行和列
excel·wps
金豆呀3 天前
WPS批量提取Word文档内容生成固定格式Excel表格
word·excel·wps
红莲凪是4 天前
使用二次封装的Excel COM 组件操作Excel\WPS ET IExcelRange 高级应用
python·excel·wps
xiaopai9455 天前
WPS做工程项目台账哪些能管、哪些管不住?
wps·工程项目·建米软件
Sunflower028 天前
如何解决word/WPS word 中表格跳到下一页(上一页有大篇幅空白)
word·wps
码上得天下8 天前
如何在默认打开方式设置中去掉已失效\已删除的应用选项?(比如WPS)
wps
PythonFun17 天前
WPS浏览器助手,AI智能阅读新体验
人工智能·wps
TMT星球18 天前
金山办公持续落子AI办公:灵犀专业版、WPS Comate同日发布
大数据·人工智能·wps