请问如何批量快速删除WPS文档中大量无用的样式?

打开一篇文档,里面有大量未使用的字体样式,至少上百种,一个一个删除,费时费力,很多人说的全选文本,一键清除样式,那种根本就不是同一个问题,而是样式表里面有很多没有使用的样式,很影响正常选择需要用到的样式,请官方人员处理一下这个问题。
四川省
浏览 2818
1
7
分享
7 +1
5
1 +1
全部评论 5
 
学习
· 广东省
回复
 
那么多!
· 上海
回复
 
花猪

@金山办公

这也太多了,是比较影响使用,我们看下怎么处理。
· 广东省
1
回复
 
wils

创作者俱乐部成员

做好备份,可以试试这个 function tt(){ const s = [] const d = Documents.Add() for (const i of d.Styles) { s.push(i.NameLocal) } d.Close() for (const i of ActiveDocument.Styles) { if (!s.includes(i.NameLocal)) { i.Delete() } } }
· 广东省
回复
 
wils

创作者俱乐部成员

function tt() { for (let i of ThisWorkbook.Styles) { if (i.Name.slice(0, 2) == "样式") { i.Delete() } } } 用宏,列出所有样式,找出需要删除的样式的名称特点,删除 主要问题是wps自带的样式的buildin属性也是false,所以没法判断哪些是系统自带的 也可以先找个空的文档,导出默认样式的名称,再用宏,删掉不包含在内的样式,就是有点麻烦
· 广东省
1
回复