两个工作表对应数据

laterite

表1中有若干人，表2中同样有若干人及号码（B列中数据），两表中顺序因实际操作中录入时间不同可能会出现不一致。

需求：将表1中的人与表2中的人作对比，如果是同一人（已去重），则将其对应的号码复制到表1中人名后B列相应位置，如果表1中没有表2中的人，则不作任何操作（如事例中的帅男、靓女）。如果表2中的人没有表1中的人（事例中没有表1中的刘二），则弹窗提示

求帮忙，谢谢

ykcbf1100

详见附件。

laterite

ykcbf1100 发表于 2023-2-22 16:35
详见附件。

又快又好的解决了我的问题，再次感谢！

laterite

ykcbf1100 发表于 2023-2-22 16:35
详见附件。

补充问一句，如果表2中的人与表1相比，有多人不存在时，可否msgbox"表2中无" &arr(i,1) &"此人"，改为在一条msgbox内提示，而不用分几条提示？谢谢

shiruiqiang

你还不如单元格标红好

gwjkkkkk

laterite 发表于 2023-2-22 17:04
补充问一句，如果表2中的人与表1相比，有多人不存在时，可否msgbox"表2中无" &arr(i,1) &"此人"，改为在 ...

利用草爷的代码修改一下。。。

laterite

gwjkkkkk 发表于 2023-2-22 18:35
利用草爷的代码修改一下。。。

好的，谢谢

laterite

shiruiqiang 发表于 2023-2-22 17:31
你还不如单元格标红好

不好意思，因为是做的窗体，所以无法标红处理

laterite

gwjkkkkk 发表于 2023-2-22 18:35
利用草爷的代码修改一下。。。

劳驾再请教一下，如果我想让提示中的姓名用“、”隔开，而不是换行符又该怎么改代码呢，谢谢

wowo000

laterite 发表于 2023-2-22 22:24
劳驾再请教一下，如果我想让提示中的姓名用“、”隔开，而不是换行符又该怎么改代码呢，谢谢

楼主：老师代码里的修一句 strtxt = strtxt & "，" & arr(i, 1)即可。