【WPS JSA】对选择区域隔一行插n行

大家好,我是宽吻鳄。这里是「宽吻鳄画表勒格记」——专注WPS表格硬核技巧,每期干货,让你的工作效率直线飙升!欢迎关注,咱们一起解锁更多高效技能!
日常使用WPS表格时,我们经常会遇到插入行的操作:设计表格结构、制作工资条时隔行插行、员工名单中隔行插入备注行、成绩表中隔行插入分析行,或者财务数据中隔行插入说明行……场景比比皆是。
实现方式也有不少,比如逐行手动插入空行,或者借助辅助列配合排序批量生成空行。这些方法在小数据量时尚能应付,但一旦数据达到几百条、上千条或更多,手工操作就变得极其繁琐,效率低下,甚至令人崩溃,常常得加班了。
有没有好的方法呢?有,记住一个核心原则:使用WPS表格时,凡是批量重复的工作,都可以用JSA代码一键搞定,秒速完成!来吧,上代码。
【WPS JSA】代码:
function 对选择区域隔一行插n行() {//先要选择数据区try {let selection = Application.Selection;let totalRows = selection.Rows.Count;let targetSheet = selection.Worksheet;let mInput = InputBox("请输入每次插入几行?", "隔一行插n行", "3");if (mInput === "") {Console.log("用户取消操作");return;}let m = parseInt(mInput);// 参数校验if ( isNaN(m) || m < 1) {Console.log("❌ 参数无效,请重新运行(m≥1)");return;}// 从下往上,在每一行后面插入3行for (let i = totalRows - 1; i >= 0; i -= 1) {let insertRow = selection.Rows.Item(i + 1).Row;// 连续插入3行for (let j = 0; j < m; j++) {targetSheet.Rows(insertRow).Insert();}}Console.log("隔一行插入"+m+"行完成!");} catch (error) {Console.log("错误: " + error.message);}}
操作步骤:
方法一:
1.打开你的WPS表格文件。按下 Alt + F11(或点击「开发工具」→「WPS宏编辑器」),打开WPS JSA编辑器。
2.插入模块并粘贴代码。在编辑器左侧右键点击「项目」中的当前工作簿,选择「插入」→「模块」,将代码完整复制到右侧代码窗口中。
3.回到WPS表格界面,选择数据区域,点击「开发工具」→「运行宏」,找到相应宏,点击「运行」即可。
方法二:
1.打开你的WPS表格文件。按下 Alt + F11(或点击「开发工具」→「WPS宏编辑器」),打开WPS JSA编辑器。
2.按Ctrk+O键,导入相应js文件,就导入js文件。
3.回到WPS表格界面,选择数据区域,点击「开发工具」→「运行宏」,找到相应宏,点击「运行」即可。
大家可以动手试一试,看看是否能顺利实现隔行插入。如果好用,对工作有所帮助,别忘了点个赞,或转发给同事和朋友。更期待你在留言区分享使用中遇到的问题,我们一起交流探讨。
每一次互动,都值得期待。让我们共同成长!
往期内容推荐:

可下载以下资料查看测试:
夜雨聆风