WPS清除图片段落布局脚本

WPS文档中如果存在大量图片,没有居中对齐的情况,一个个调整太费时费力, 写了个脚本批量处理, 脚本如下:

javascript 复制代码
/**
 * 清除图片段落布局
 */
function clearImageParagraphLayout_v2() {
    try {
        const doc = Application.ActiveDocument;
        if (!doc) return alert("请先打开文档");

        const processedParaIds = new Set();
        let totalProcessed = 0;

        // 处理嵌入式图片(更可靠的获取方式)
        const inlineShapes = doc.InlineShapes;
        for (let i = 1; i <= inlineShapes.Count; i++) {
            try {
                const shape = inlineShapes.Item(i);
                const para = shape.Range.Paragraphs.Item(1);
                if (para && !processedParaIds.has(para.ParaID)) {
                    resetParagraphFormat(para);
                    processedParaIds.add(para.ParaID);
                    totalProcessed++;
                }
            } catch (e) {
                // 跳过有问题的图片
                continue;
            }
        }

        // 处理浮动式图片(兼容不同版本的锚点获取)
        const shapes = doc.Shapes;
        for (let j = 1; j <= shapes.Count; j++) {
            try {
                const shape = shapes.Item(j);
                // 尝试不同的锚点获取方式
                let para;
                if (shape.Anchor) {
                    para = shape.Anchor.Paragraphs.Item(1);
                } else {
                    para = shape.Range.Paragraphs.Item(1);
                }

                if (para && !processedParaIds.has(para.ParaID)) {
                    resetParagraphFormat(para);
                    processedParaIds.add(para.ParaID);
                    totalProcessed++;
                }
            } catch (e) {
                // 跳过有问题的图片
                continue;
            }
        }

        alert(`已处理 ${totalProcessed} 个包含图片的段落\n共检测到 ${inlineShapes.Count + shapes.Count} 张图片`);
    } catch (e) {
        alert("操作失败:" + e.message);
    }
}

// 重置段落格式的辅助函数(使用具体数值代替常量,避免版本问题)
function resetParagraphFormat(para) {
    para.FirstLineIndent = 0;
    para.LineSpacingRule = wdLineSpaceSingle;
    para.Alignment = 1;
}
相关推荐
骆驼爱记录1 天前
Word尾注添加全攻略
自动化·wps·新人首发
骆驼爱记录2 天前
Excel高效粘贴技巧:仅填充可见单元格
自动化·excel·wps·新人首发
骆驼爱记录3 天前
Word页脚设置全攻略
自动化·wps·新人首发
涛涛讲AI5 天前
如何使用WPS开发平台的API调试台获取WPS的多维表格的内容
wps
jiecy5 天前
WPS 的多条件更改单元格样式
wps
爱上妖精的尾巴6 天前
7-8 WPS JS宏 对象使用实例5--按多字段做多种汇总
javascript·后端·restful·wps·jsa
hrw_embedded8 天前
WPS最新版本离线使用设置
wps
默默提升实验室8 天前
禁止WPS自动添加计划任务
wps
熊文豪8 天前
WPS Excel 内嵌图片的程序化导入导出技术
excel·poi·wps
昵称什么的不存在9 天前
linux安装WPS和typora等deb包,以及typora的linux版本激活
linux·运维·wps