数据筛选排列

hnzzhgy

cjc209

=SORT(FILTER(A1:B48,B1:B48<>"|HD"))

hnzzhgy

谢谢cjc209，如果B列不只是"|HD"，还有其他不同的文字或符号咋办？

半百

为什么“1HDC07#####”会排在最后？

cjc209

hnzzhgy 发表于 2025-11-3 16:38
谢谢cjc209，如果B列不只是"|HD"，还有其他不同的文字或符号咋办？

那就判断是不是数字 只要能产生布尔值就行了

cjc209

hnzzhgy 发表于 2025-11-3 16:38
谢谢cjc209，如果B列不只是"|HD"，还有其他不同的文字或符号咋办？

=SORT(FILTER(A1:B48,MAP(B1:B48,LAMBDA(x,ISNUMBER(x)))))

ykcbf1100

附件供参考。。。

ykcbf1100

1. Sub ykcbf()   '//2025.11.3
   
2.     arr = Range("a1").CurrentRegion.Value
   
3.     ReDim brr(1 To UBound(arr), 1 To 3)
   
4.     [h:i].ClearContents
   
5.     For i = 1 To UBound(arr)
   
6.         If Val(arr(i, 2)) Then
   
7.             m = m + 1
   
8.             brr(m, 1) = arr(i, 1)
   
9.             brr(m, 2) = arr(i, 2)
   
10.         End If
    
11.     Next
    
12.     Set Rng = [h5].Resize(m, 2)
    
13.     Rng.Value = brr
    
14.     Rng.Sort Rng.Columns(1), 1
    
15.     brr = Rng.Value
    
16.     For i = 1 To m - 1
    
17.         For j = i + 1 To m
    
18.             If InStr(brr(i, 1), "##") Then
    
19.                 For x = 1 To 2
    
20.                     temp = brr(i, x)
    
21.                     brr(i, x) = brr(j, x)
    
22.                     brr(j, x) = temp
    
23.                 Next
    
24.             End If
    
25.         Next j
    
26.     Next i
    
27.     Rng.Value = brr
    
28. End Sub
    

复制代码

hnzzhgy

ykcbf1100的方法可以，但cjc209的=SORT(FILTER(A1:B48,MAP(B1:B48,LAMBDA(x,ISNUMBER(x)))))公式我复制在单元格中是错误项！

cjc209

hnzzhgy 发表于 2025-11-3 17:35
ykcbf1100的方法可以，但cjc209的=SORT(FILTER(A1:B48,MAP(B1:B48,LAMBDA(x,ISNUMBER(x)))))公式我复制在单 ...

你的版本太低 wps官方最新32位个人版