如何用VBA替换vlookup函数运行速度慢怎么处理
来源:网络收集 点击: 时间:2024-03-27【导读】:
如何用VBA替换vlookup函数运行速度慢怎么处理工具/原料moreEXCEL2007-2016电脑一台方法/步骤1/9分步阅读
2/9
3/9
4/9
5/9
6/9
7/9
9/9
编程语言VBA替换VLOOKUP
新建一个EXCEL工作表,并保存为启用宏的工作薄


点击文件--选项---信任中心---信任中心设置,开启宏控制

输入数据,要求用VBA根据编号,查找对应的姓名和成绩

点击开发工具-插入--按钮控件

在弹出的窗口点击新建,

而后会进入VBA编辑界面。我们需要讲准备好的代码,复制到VBA窗口

代码:
Sub 按钮1_Click()
arr = 条件区域
Set d = CreateObject(scripting.dictionary)
For i = 2 To 3 用来查找放置的原始数据
Set d(arr(1, i)) = CreateObject(scripting.dictionary)
For j = 2 To 900000 可以在数据库中提取的最小最大个数
d(arr(1, i))(arr(j, 1)) = arr(j, i)
Next
Next
For i = 7 To 8 就是查找的结果要放置的列号地方
For j = 2 To 1000 符合条件的数据粘贴的行范围
Cells(j, i) = d(Cells(1, i).Text)(Cells(j, 6).Text) 1是指的数据范围的标题,6为条件列
Next
Next
End Sub
8/9代码复制后如图

而后我们点击按钮,就会得出符合条件的值

版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_365732.html
上一篇:Cinema 4D如何制作弹跳动画
下一篇:网上国网怎么查看积分