求一个可以把每列的数据集中起来的方法

gzminge

求把Sheet1工作表中每一列不为0的数据，集中起来放在Sheet2工作表的A列中。





1122.rar (27.41 KB, 下载次数: 7)

2024-5-24 21:44 上传

点击文件名下载附件

longwin

请测试.....

剑指E

A1:

1. =IFERROR(INDEX(SORT(RIGHT(0&FILTER(Sheet1!A$1:A$190,ISTEXT(Sheet1!A$1:A$190)),5),,-1),ROW(A1)),"")

复制代码

右拉，下拉

LIUZHU

按问题要求来的，但是运行结果却和楼主给定的结果有差异

LIUZHU

JSA代码，不是VBA

1. function 提取数据(){
   
2.         const arr=Sheets.Item("Sheet1").Range("a1").CurrentRegion.Value2;
   
3.         let res=arr.reduce((res,x)=>{
   
4.                 x.forEach(y=>y!=0?res.push([y]):null);
   
5.                 return res;
   
6.         },[]);
   
7.         Sheets.Item("Sheet2").Range("a1").Resize(res.length, res[0].length).Value2=res;
   
8. }

复制代码

LIUZHU

附件在此，WPS打开，运行JS宏