查找一个部门的所有员工

自由之空间 · 发表于 2018-12-13 18:37

请大侠帮忙一下

自由之空间 · 发表于 2018-12-13 18:37

请大侠帮忙一下

我走我流 · 发表于 2018-12-13 19:21

自由之空间发表于 2018-12-13 18:37
请大侠帮忙一下

没有高版本的EXCEL，函数难得写
=TEXTJOIN("、",,IF(A:A=E2,B:B,""))
数组需要，365或者WPS 的TEXTJOIN函数支持

ggmmlol · 发表于 2018-12-13 19:28

我走我流发表于 2018-12-13 19:21
没有高版本的EXCEL，函数难得写
=TEXTJOIN("、",,IF(A:A=E2,B:B,""))
数组需要，365或者WPS 的TEXTJOIN ...

无需高版本EXCEL，自己做一个TEXTJOIN函数就行了：

Public Function TEXTJOIN(Optional ByVal Delimiter As String = "", Optional ByVal ignore_empty As Boolean = True, Optional ByVal args As Variant) As String '
Dim tmptext As Variant, rng As Variant, cel As Variant
tmptext = ""
For Each rng In args
If IsArray(rng) Then
For Each cel In rng
If Len(cel) Or Not ignore_empty Then tmptext = tmptext & Delimiter & cel
Next cel
Else
If Len(rng) Or Not ignore_empty Then tmptext = tmptext & Delimiter & rng
End If
Next
TEXTJOIN = Mid(tmptext, Len(Delimiter) + 1)
End Function

复制代码

usr168 · 发表于 2018-12-13 19:54

=OFFSET($B$1,SMALL(IF($A$2:$A$10=$E$2,ROW($A$1:$A$9),9999),ROW(F1)),,,)
数组公式,按三键回车

cjc209 · 发表于 2018-12-13 19:59

usr168 发表于 2018-12-13 19:54
=OFFSET($B$1,SMALL(IF($A$2:$A$10=$E$2,ROW($A$1:$A$9),9999),ROW(F1)),,,)
数组公式,按三键回车

你的每次只能取一个值不能全部提取到一个单元格内你理解题意都没有理解

usr168 · 发表于 2018-12-13 20:02

知道什么是"数组公式,按三键回车"吗?

自由之空间 · 发表于 2018-12-13 20:42

谢谢各位了，非常感谢

真·萌新·80 · 发表于 2018-12-13 22:50

我走我流发表于 2018-12-13 19:21
没有高版本的EXCEL，函数难得写
=TEXTJOIN("、",,IF(A:A=E2,B:B,""))
数组需要，365或者WPS 的TEXTJOIN ...

原来是这样，学习了

黑袍－如来 · 发表于 2020-4-17 15:16

=IFERROR(INDEX($B$2:$B$20,SMALL(IF($A$2:$A$10=$E$2,ROW($A$1:$A$9),9999),ROW(F1)))&"","")
数组公式，下拉

		自动登录	找回密码
密码			免费注册

[已解决] 查找一个部门的所有员工