按物料名称和规格升序排列

绿色心情小天使

E友的坛友晚上好：
     有一张表INDEX，记录着螺钉的物料信息，现需要排序，第一按同一物料名称一样的罗列在一起，第二条件物料名称一样，按规格升序排序在一起，排序结果放在第二张工作表中，“结果”工作表区，附件如下！
   螺钉按名称和规格排序.rar (15.68 KB, 下载次数: 18)

2025-12-8 20:56 上传

点击文件名下载附件

ykcbf1100

如果就二个条件，直接工作表排序即可。
应该没那么简单吧，规格列是不是还要拆分出来再排序的？

风雨相随3

螺钉按名称和规格排序.tar (198.5 KB, 下载次数: 1)

2025-12-8 21:09 上传

点击文件名下载附件

=VSTACK(Index!A1:D1,SORTBY(Index!A2:D501,Index!C2:C501,1,Index!D2:D501,1))

ykcbf1100

1. Sub ykcbf()   '//2025.12.8
   
2.     Set ws = ActiveSheet
   
3.     r = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
   
4.     With ws.Range("a2:d" & r)         '//双条件排序
   
5.         .Sort Key1:=.Columns(3), Order1:=1, _
   
6.             Key2:=.Columns(4), Order2:=1, _
   
7.             Header:=xlNo
   
8.     End With
   
9. End Sub
   

复制代码

ykcbf1100

风雨相随3 发表于 2025-12-8 21:09
=VSTACK(Index!A1:D1,SORTBY(Index!A2:D501,Index!C2:C501,1,Index!D2:D501,1))

1楼的附件是xls文件，你这公式应该用不了吧

风雨相随3

ykcbf1100 发表于 2025-12-8 21:14
1楼的附件是xls文件，你这公式应该用不了吧

1楼的附件是xls文件，你这公式应该用不了吧

ykcbf1100

风雨相随3 发表于 2025-12-8 21:27
1楼的附件是xls文件，你这公式应该用不了吧

xls文件没有VSTACK函数吧。

风雨相随3

ykcbf1100 发表于 2025-12-8 21:29
xls文件没有VSTACK函数吧。

我用的是WPS365.和保存格式没关系。如果规格列要拆分，就再造一个数组。

ykcbf1100

风雨相随3 发表于 2025-12-8 21:30
我用的是WPS365.和保存格式没关系。

好吧。。。

绿色心情小天使

ykcbf1100 发表于 2025-12-8 21:05
如果就二个条件，直接工作表排序即可。
应该没那么简单吧，规格列是不是还要拆分出来再排序的？

大神晚上好：
   经测试，名称和规格没没有排序，如下图。需要名称一样在先排序，再对规格排序。