用vba写了个模仿vlookup的程序，可以关联多列数据，操作简单

bj917 · 发表于 2020-9-7 11:16

用vba写了个模仿vlookup的程序，可以关联多列数据，操作简单，适合需要关联多列数据，又嫌麻烦的人。场景举例说明：假设第一个sheet1是工作用的表，第一列是姓名；

第二个表，假设名字是"人员信息",包含姓名，部门，还有其它信息；

操作步骤：活动工作表示sheet1，点击执行vba，会弹出对话框，

这里是指人员信息表里的列号，可以从第一列开始

这里是指指需要关联到sheet1表的数据共几列，是根据上一步选泽的列开始计算的；假设上一步选择的是1，这一步是2，那么会包含A列和B列；

这里是指sheet1表。
下面是操作示范：
录制_2020_09_07_11_06_21_514.gif

附件在vba窗口导入个人宏工作薄即可。

部门.rar (1.66 KB, 下载次数: 300)

爱因斯坦的眼泪 · 发表于 2020-9-8 00:19

如果有重复的你是怎么解决的呢

xj123321 · 发表于 2020-9-8 08:11

感谢分享

bj917 · 发表于 2020-9-8 08:43

本帖最后由 bj917 于 2020-9-8 08:48 编辑

这个程序实际是利用了字典，所以会自动剔除重复的，也就是说人员信息表里如果有相同的，只保留一个。
利用字典，主要是解决效率问题，以为如果表里有1000行，若果用单元格赋值的话，需要接近一分钟，但是利用字典和数组的话，基本1-2秒钟左右。
基础表--字典--items--数组--cells

补充内容 (2020-12-29 15:33):
vlookup每次只能返回一列值，该代码可以根据需要返回所需要的值。

补充内容 (2021-4-25 11:37):
后来发现超过5万的，使用字典好像效率还是有点低，没有数组快。

chenyonghtc · 发表于 2020-11-30 15:03

简单直接，给力。

plalw · 发表于 2020-11-30 20:49

无法导入呢

bj917 · 发表于 2020-12-6 14:47

plalw 发表于 2020-11-30 20:49
无法导入呢

excel的--开发工具--visualBasic---文件---导入文件---选择部门.bas 文件

xvjiex · 发表于 2021-3-30 10:07

用vba写了个模仿vlookup的程序，可以关联多列数据。很有创意，感谢分享！

Aaron.Ma · 发表于 2022-7-11 14:02

Nice~講的很詳細哦，

bj917 · 发表于 2023-5-7 11:54

进行修改，可以支持跨工作薄进行数据的关联了。

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

[分享] 用vba写了个模仿vlookup的程序，可以关联多列数据，操作简单

评分