WPS的JS宏如何设置Word文档的表格的单元格文字重新编号

本文介绍了一个如何使用VBA代码自动修复Word文档中表格编号混乱的问题,通过遍历每个单元格并应用列表格式,实现批量且高效地重新编号,减少手动调整的繁琐过程。
摘要由CSDN通过智能技术生成

希望对Word文档中的表格进行统一处理,表格内的编号,有时候会出现紊乱,下一个表格的编号承接了上一个表格的编号,实际需要重新编号。

当表格比较多时,手动更改非常麻烦,而且更改一遍并不能完成,后续还要进行多次的修改和编辑,就会导致不停地修改,工作重复而繁琐。

例如:

如下代码解决了对表格中的每一个单元格进行重新编号的问题。

function 表格内编号设置()
{    
    let iCount = Selection.Cells.Count;
    
    //多个单元格设定
    for(i=1;i<=iCount;i++)
    {            
        Selection.Cells.Item(i).Range.Style     = "List Paragraph";
        pListTemplate =Selection.Cells.Item(i).Range.ListFormat.ListTemplate;
        Selection.Cells.Item(i).Range.ListFormat.ApplyListTemplate(pListTemplate,false);
    }   
}

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

红狐九尾

你的鼓励是我持续创作的动力!

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值