找出两列中相同的数据，并让数据保持在同一行

jojo773

找出两列中相同的数据，并让数据保持在同一行   但不同的数据归纳到另外的列或排序到最下

dim麻辣君

=IF(COUNTIF($C:$C,$A4),VLOOKUP($J4,$C:$D,COLUMN(A1),),"")

jojo773

dim麻辣君 发表于 2021-4-2 18:31
=IF(COUNTIF($C:$C,$A4),VLOOKUP($J4,$C:$D,COLUMN(A1),),"")

怎么只能找出C列对应A列相同的   不相同的应该怎么提取出来？

vilionly

L4=IF(ROW()<=(COUNTA($A$4:$A$42)+3)+(COUNTA($C$4:$C$16)-COUNTA($L$4:$L$42)),IF(J4<>"",IFERROR(VLOOKUP($J4,$C$4:$D$16,1,0),""),INDIRECT("C"&IFNA((VLOOKUP($C4,$A$4:$A$42,1,0)),ROW(A1)+3)-37)),"")

M4=IF(J4<>"",IFERROR(VLOOKUP($J4,$C$4:$D$16,2,0),""),IFERROR(VLOOKUP($L4,$C$4:$D$16,2,0),""))

我走我流

如果愿意接受Power query的话，一个合并查询结果就出来了

acezxc369

=IFERROR(INDEX($C$4:$C$16,MATCH(TRUE,$C$4:$C$16=J4,0)),"")

acezxc369

三建结束 数组函数

sjlxp2010

Sub db()
Dim arr, brr(1 To 1000, 1 To 2), crr(1 To 100, 1 To 2), i, j
arr = Sheet2.UsedRange
d = 1
For i = 4 To UBound(arr)
    For j = 4 To UBound(arr)
        If arr(i, 3) = arr(j, 1) Then
            brr(j, 1) = arr(i, 3)
            brr(j, 2) = arr(i, 4)
            GoTo a
        End If
    Next j
    If brr(j - 1, 1) = "" Then
        crr(d, 1) = arr(i, 3)
        crr(d, 2) = arr(i, 4)
        d = d + 1
    End If
a:  Next i
   
Sheet2.Range("e1").Resize(UBound(arr), 2) = arr
Sheet2.Range("g1").Resize(UBound(brr), 2) = brr
Sheet2.Range("g" & UBound(arr)).Resize(UBound(crr), 2) = crr


End Sub

zpy2

Select b.食材 b,b.数量 b数量,c.食材 c,c.数量 c数量 from (select 食材 from 食材数量明细表 union select 食材 from 食材数量2明细表) a left join 食材数量明细表 b using (食材) left join 食材数量2明细表 c using (食材)

dim麻辣君

jojo773 发表于 2021-4-2 19:49
怎么只能找出C列对应A列相同的   不相同的应该怎么提取出来？

你模拟数据就是这样子的呀