跨表格提取唯一值

＿﹏赏月ぐ

学习了，向高手致敬！

wangg913

cxlove1018 发表于 2018-2-27 16:18
老师您好！看了您的附件的确实现了我想要的功能，非常感谢。
但是您的公式太高端了，以至于我这个新手不 ...

按照007改的。

1. =INDIRECT(TEXT(MIN(IF((T(OFFSET(INDIRECT({1,2,3,4,5,6,7,8,9,10,11,12}&"月份!f1"),ROW($1:$20),))="是")*(COUNTIF($B$2:$B2,T(OFFSET(INDIRECT({1,2,3,4,5,6,7,8,9,10,11,12}&"月份!c1"),ROW($1:$20),))&"*")=0),{1,2,3,4,5,6,7,8,9,10,11,12}/1%+ROW($2:$21),8^8)),"[>1e7]r0c000;0月份!!r00c"&COLUMN(C1)),)&""

复制代码

delete_007

cxlove1018 发表于 2018-2-27 16:18
老师您好！看了您的附件的确实现了我想要的功能，非常感谢。
但是您的公式太高端了，以至于我这个新手不 ...

楼上头版已经给你答案了，数组公式，按<CTRL+SHIFT+ENTER>组合键结束。

cxlove1018

mikezhan 发表于 2018-2-27 16:37
这种问题，直接用VBA！！！ 少用函数。那上面大侠写的函数，你没个十年修炼是看不明白的！！！

学点VBA, ...

是的！在工作中，感觉学点VBA可以解决很多问题。目前正在学习中，谢谢提点！！

cxlove1018

wangg913 发表于 2018-2-27 16:49
按照007改的。

万分感谢老师！根据您的数据公式问题已经解决。谢谢

cxlove1018

delete_007 发表于 2018-2-28 08:50
楼上头版已经给你答案了，数组公式，按组合键结束。

万分感谢！根据您提供的数组公式以及wangg913老师的更改，问题已经解决了。
虽然我暂时还不能理解这个公式的意思，但照葫芦画瓢用起来！！非常感谢！！！

cxlove1018

mikezhan 发表于 2018-2-27 16:37
Sub test()
Dim i&, arr1, arr2()
Set dic = CreateObject("scripting.dictionary")

老师您好！非常感谢您提供的代码，我尝试运行了。能不能麻烦您按我这一次上传的附件修改下代码，同时能正常显示所提取人员的身份证号码（您的代码能实现提取人员姓名，但身份证号码会变成科学计数显示）。

cxlove1018

delete_007 发表于 2018-2-28 08:50
楼上头版已经给你答案了，数组公式，按组合键结束。

老师您好！如果用VBA怎么实现（按本次上传的附件格式）？麻烦老师能否提供下代码，我也想学习一下！谢谢老师！