ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 923|回复: 4

[求助] WPS 宏 JS环境下 做一个工作周记

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-9-2 10:53 | 显示全部楼层 |阅读模式

我想用WPS 宏 JS环境下,实现以下的内容
哪位大神帮帮忙
我想要实现,在H4-J10的合并单元格中,填入J13-J17的内容,,填写完后,如果E12,E19,E26,E33,E40,E47是空值,则不填,如果其中一个有数值,刚按顺序,把序列号从6开始往下偏,如左图号。6.填写是的E12的数值,(E19是空值,所以第7填的是,E26是数值)

工作周记.zip

26.43 KB, 下载次数: 7

TA的精华主题

TA的得分主题

发表于 2024-9-3 16:54 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2024-9-3 18:50 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
JSA练习一下——


微信截图_20240903184943.png

  1. function 填写信息() {
  2.     const obj = Range('D6:F' + Range('D6').End(xlDown).Row)().reduce((a, [info, num, remark]) => {
  3.         a[info] ??= [0, 0];
  4.         if (Number(num)) a[info][0] += num;
  5.         if (Number(remark)) a[info][1] += remark;
  6.         if (info === '其他' && num) !a[info].includes(num) ? a[info].push(num) : null;
  7.         return a;
  8.     }, {});
  9.     let res = [], id = 0;
  10.     for (let o in obj) {
  11.         if (o !== '其他') {
  12.             let strRemark = obj[o][1] ? ', 其中做文件' + obj[o][1] + '份' : '';
  13.             if (obj[o][0]) res.push(`${++id}. ${o}${obj[o][0]}${strRemark}`);
  14.         } else {
  15.             obj[o].slice(2).forEach(v => res.push(`${++id}. ${v}`));
  16.         }
  17.     }
  18.     Range('H4').Value2 = res.join('\n');
  19.     alert(`信息统计完成,结果已写入“H4”中~`);
  20. }
复制代码


评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-9-10 14:37 | 显示全部楼层
好久不用有点生疏了。
360截图20240910143516474.jpg

工作周记.zip

26.82 KB, 下载次数: 8

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-11-1 17:25 | 显示全部楼层
练习一下
function 统计(){
        let arr = Range("J13:J23").Value2
        arr = arr.filter(x =>{if(x[0]){return x}})
        arr = arr.filter((x,i) => {
                if(i>4){
                        return x[0] = `${i+1}.`+x[0]
                        }else{
                                return x
                                }                                       
        })       
        Range("H4").Value2 = arr.join(`\n`)         
}
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-21 16:30 , Processed in 0.040868 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表