求老师帮忙看看这个问题，查找包含文本位置，依次输出所在行列。

keke2xiaodie

左边表格是手都输入的，如果可以不用VBA，建一个职工表，手动输入人员流动情况，然后多选填入左边就更好了。
但是想了一下好像无法实现，只能手动输入左边表格。

左边是看每个岗位都有谁在做，右边是看某个员工都在哪些岗位工作，以此来分配工作量。
主要需求是：能通过公式生成右边表格。



工作簿.xlsx 可复制链接到WPS Office中打开文档]附件



工作簿.xlsx.zip (10.3 KB, 下载次数: 11)

2023-6-6 16:40 上传

点击文件名下载附件

高个子

上传附件。

keke2xiaodie

高个子 发表于 2023-6-6 16:18
上传附件。

不好意思电脑传文件有点问题，现在已上传。

tchh666

1. =IFNA(IF(ROW(),UNIQUE(EVALUATE("{"""&SUBSTITUTE(TEXTJOIN("、",,B2:D4),"、",""";""")&"""}"))),"")

复制代码

1. =IFNA(IF(COLUMN(),EVALUATE("{"""&TEXTJOIN(""",""",1,IF(ISERR(FIND("、"&F2&"、","、"&B$2:D$4&"、")),"",A$2:A$4&"-"&B$1:D$1))&"""}")),"")

复制代码

按照WPS做法，，均为区域数组公式。。

my0745

1. =IF(F2="","",IFERROR(INDIRECT(ADDRESS(MID(SUBSTITUTE(TEXTJOIN("、",TRUE,IF(ISNUMBER(FIND($F2,$B$2:$D$4)),ROW($B$2:$D$4),"")),"、",REPT(" ",100)),COLUMN(A:A)*100-100+1,100),1))&"-"&INDIRECT(ADDRESS(1,MID(SUBSTITUTE(TEXTJOIN("、",TRUE,IF(ISNUMBER(FIND($F2,$B$2:$D$4)),COLUMN($B$2:$D$4),"")),"、",REPT(" ",100)),COLUMN(A:A)*100-100+1,100))),""))

复制代码

gwjkkkkk

vba 法，请参考 。。。

nqwl

my0745 发表于 2023-6-6 18:53

太强大了

renzidong

人名=UNIQUE(TRANSPOSE(TEXTSPLIT(TEXTJOIN("、",TRUE,B2:D4),"、")))；岗位=TEXTSPLIT(TEXTJOIN("/",TRUE,IF((ISNUMBER(FIND(F8,$B$2:$D$4))*1)=0,"",$A$2:$A$4&"-"&$B$1:$D$1)),"/")

keke2xiaodie

tchh666 发表于 2023-6-6 17:15
按照WPS做法，，均为区域数组公式。。

谢谢老师，第二个岗位的公式是不是只能一行一行的粘贴公式，手动改名字列的行号，好像EVALUATE不能智能填充。
另外老师，如果一个人名只有一个岗位的话就会整行都显示这个岗位，UNIQUE好像对唯一项不起作用。

tchh666

keke2xiaodie 发表于 2023-6-11 16:52
谢谢老师，第二个岗位的公式是不是只能一行一行的粘贴公式，手动改名字列的行号，好像EVALUATE不能智能填 ...

1. =IFNA(IF(COLUMN(),EVALUATE("{"""&TEXTJOIN(""",""",1,IF(ISERR(FIND("、"&F2&"、","、"&B$2:D$4&"、")),"",A$2:A$4&"-"&B$1:D$1)," ")&"""}")),"")

复制代码

选中G2:K2  输入公式，三键结束

复制G2:K2 后  选中 G3:K6 粘贴。。