根据单元格内容添加多列

LIUZHU

cnmlgb9998 发表于 2024-6-18 20:19
借楼练一下PQ，是这个效果吗？？？

数据 太脏，清洗好麻烦。

不是PQ不香，而是应用越来越窄，Office都被取代了，自然也就没有PQ什么事了

kkkak

LIUZHU 发表于 2024-6-18 17:21
我说的是拆分后的样子，不是原始表格

不好意思，我理解错误。我想弄成这个样子，最好能把里面多余的空格一起清理掉

LIUZHU

尝试下，效果展示

LIUZHU

JS代码，供参考

1. function 匹配(){
   
2.         let res=Range("e2:e13").Value2.reduce(function(res,[s],i){
   
3.                 return res[res.length]=s.replace(/[ \n]+/g,"").match(this).reduce(function(rs,x){
   
4.                         let [cf,xm]=x.replace("：","").split(this);
   
5.                         if (!res[0].includes(cf)) res[0].push(cf);
   
6.                         let n=res[0].indexOf(cf);
   
7.                         return rs[n]=xm, rs;
   
8.                 }.bind(/(?<=\w)(?=[一-龥])/),[]), res;
   
9.         }.bind(/成分.+?(?=成分|$)/mg),[[]]);
   
10.         Range("f1").Resize(res.length, res[0].length).Value2=res;
    
11. }

复制代码

LIUZHU

附件，WPS测试

kkkak

LIUZHU 发表于 2024-6-19 11:32
附件，WPS测试

excel和WPS都提示无法运行这个宏啊

LIUZHU

kkkak 发表于 2024-6-19 16:04
excel和WPS都提示无法运行这个宏啊

JS宏，不是VBA，用WPS打开，运行JS宏，JS宏找不到的话，说明WPS版本太老了