根据条件增加处理2列

江林

根据A列是否有括号，来增加两列

grf1973

附件用wps打开。

LIUZHU

做出来这个效果

LIUZHU

JSA代码，供参考

1. function 整理数据(){
   
2.         const arr=Sheets.Item("柱 ").Range("a1").CurrentRegion.Value2;
   
3.         const shname=Sheets.Item("柱 ").Name,wbname=ThisWorkbook.Name.replace(/.xls[xm]?$/,"");
   
4.         const regex1=/^.+(?=\()/, regex2=/(?<=\().+(?=\))/;
   
5.         let res=arr.slice(1).reduce((res,x)=>{
   
6.                 let [xm,lc]=[regex1,regex2].map(re=>re.test(x[0])?x[0].match(re)[0]:null);
   
7.                 [x[0], x[x.length], x[x.length]]=[lc || x[0], shname, xm || wbname];
   
8.                 return (res.push(x),res);
   
9.         },[arr[0].concat(["构建类型","项目名称"])]);
   
10.         Sheets.Item("整理后").Activate();
    
11.         Cells.Clear();
    
12.         Range("a1").Resize(res.length,res[0].length).Value2=res;
    
13.         Range("a1").CurrentRegion.Borders.LineStyle=1;
    
14.         Range("a1").CurrentRegion.EntireColumn.AutoFit();
    
15. }

复制代码

LIUZHU

请查收附件，WPS测试