EXCEL VBA终极提速,超级公式,算法优化

1,简化公式,200个字变成10个字

有很多公式写的很长,看不懂很难维护,如果改成VBA代码,简化成一个超级函数,方便维护,还可以给多个工程共用,实现模块化开发

2,计算提速。有些vba运算很慢,需要几分钟到几小时,用好的方法,运行速度可以减到1分钟以内甚至10秒以内。

这2天做了一个3万个左右的订单表和产品销售统计的算法。

原来的主人,运行后就卡死了,后面按10个产品去查找订单,需要1秒左右,那3万个产品就要3000秒,差不多一个小时才能完成。

后面采用了字典的方法代替每个单元格去循环对比,速度提高了100倍,只需要30秒左右。

再后来发现写入3万行2列数据也要10秒左右,采用变量绑定直接写入,只需要60毫秒。

经过终极优化,最终只需要200毫秒就完成了全部运算。

速度又提高了150倍,比最初的算法速度提高了1.5万倍。

如果还能采用多线程进行计算,估计还能提高不少。不过总体时间只有0.2秒了,没必要再折腾了。他的想法是30秒以内就很好了。

2.3万个数据转成字典Key,不引用Dictionary,用时:5281毫秒

引用的话只要39毫秒,快了135倍

写入6.3万个excel单元格用时=2304毫秒

直接用数组方式改变一批单元格只要57毫秒,快了39倍

vbnet 复制代码
2.86万个订单,查找的产品2.29万个
不用字典,纯循环查找用时17.3秒
字典生成39毫秒,查找用时85毫秒

================

V12-引用Dictionary 字典法强制声明最快

数据行数=28627,条件末行=22943

条件转字典用时:39毫秒

取产品+数量+金额 数据用时:16毫秒

提取所有数据用时=67毫秒
统计用时=85毫秒

写入单元格(超级法)用时=57毫秒

【借方V12】 >用时209毫秒,约0.003分钟


'v12不引用Dictionary 字典法,后期绑定,不声明从0.2秒变成了12秒

条件转字典用时:5281毫秒

取产品+数量+金额 数据用时:20毫秒

提取所有数据用时=5310毫秒

统计用时=6588毫秒

写入单元格(超级法)用时=59毫秒

借方V12 >用时11957毫秒

============== 纯数组方式循环几万*几万次的查找,用时17秒,最古老的方法,慢

条件转字典用时:0毫秒

取产品+数量+金额 数据用时:16毫秒

提取所有数据用时=29毫秒

统计用时=17252毫秒

写入单元格(超级法)用时=62毫秒

【借方V12】 >用时17343毫秒,约0.289分钟

相关推荐
zhangjin12221 小时前
kettle插件-excel插件,kettle读取excel动态表头,kettle根据列名读取excel
excel·kettle·kettle excel插件·kettle 动态excel
远洪16 小时前
excel 找出两列不同的数据
excel
pcplayer17 小时前
非常好用的 Excel 读写控件
excel·delphi·office
Navicat中国20 小时前
使用 Navicat 导入向导导入 Excel 数据时,系统提示导入成功,表中也能看到数据,但行数统计显示为 0,这是什么原因?
数据库·excel·导入
穿着内裤的外星人1 天前
触控精灵远程读写Excel步骤配置
excel
是孑然呀1 天前
【小记】excel vlookup一对多(第二篇)
excel
开开心心就好1 天前
专为视障人士设计的免费辅助工具
windows·计算机视觉·计算机外设·excel·散列表·推荐算法·csdn开发云
transformer_WSZ1 天前
excel两列数据绘制折线图
excel·折线图
蒋胜山1 天前
Excel 练习题(5)
经验分享·excel
Data-Miner2 天前
数以轻舟聚焦Excel-Agent场景:当AI做表工具学会说人话
人工智能·excel