如何用一个条件匹配出多个结果，sheet1表和sheet2表有相同唯一条件，如果匹配出sheet2表的多个结果

XY 追问

2022-01-14 11:35

例如这样，我要在a表显示出匹配的对应所有订单号

XY 追问

2022-01-14 11:35

数据太大了一个表都已经用十几万行，最好不用辅助列的方法

小林老师 解答

2022-01-14 11:38

您好，您的需求用power query很容易解决

XY 追问

2022-01-14 11:40

要怎么操作呢

XY 追问

2022-01-14 11:41

我不会数据库呀

小林老师 解答

2022-01-14 11:41

您好，这个需要写代码，在excel里操作，不是wps

XY 追问

2022-01-14 11:42

用vba吗，还是宏

XY 追问

2022-01-14 11:42

Function abc(a As Range, b As Range, c As String)
Dim t As String
\'如果a与b的区域大小不同，就显示“错误”
If a.Rows.Count <> b.Rows.Count Then abc = "错误": Exit Function
\'在区域a是循环
For i = 1 To a.Rows.Count
\'如果在a中找到与c相同的值，就把同一行中的b的内容提取出来，存入变量t中。
If a.Cells(i, 1) = c Then t = t & " " & b.Cells(i, 1)
Next
\'将变量的值赋给自定义函数
abc = t
End Function

XY 追问

2022-01-14 11:42

Function abc(a As Range, b As Range, c As String)
Dim t As String
\'如果a与b的区域大小不同，就显示“错误”
If a.Rows.Count <> b.Rows.Count Then abc = "错误": Exit Function
\'在区域a是循环
For i = 1 To a.Rows.Count
\'如果在a中找到与c相同的值，就把同一行中的b的内容提取出来，存入变量t中。
If a.Cells(i, 1) = c Then t = t & " " & b.Cells(i, 1)
Next
\'将变量的值赋给自定义函数
abc = t
End Function

小林老师 解答

2022-01-14 11:43

您好，都不是，是表格的新功能

XY 追问

2022-01-14 11:43

当时用过这段代码，但是特别卡

XY 追问

2022-01-14 11:44

好吧，那老师您有教程吗

小林老师 解答

2022-01-14 11:49

您好，这个是vba没使用过

小林老师 解答

2022-01-14 11:49

您好，没有相关教程