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分钟

相关推荐
inxunoffice12 小时前
批量删除或修改 Excel 表格的背景图片
excel
亦良Cool19 小时前
将Exce中工作簿的多个工作表拆分为单独的Excel文件
前端·html·excel
woniu_maggie19 小时前
SAP DOI EXCEL&宏的使用
后端·excel
saynaihe19 小时前
EXCEL IF自动填充功能
microsoft·excel
cheese-liang1 天前
Excel中使用VBA自动生成排班表
android·excel
fengyehongWorld1 天前
Excel 粘贴数据到可见单元格
excel
inxunoffice1 天前
批量删除 Excel 中所有图片、某张指定图片以及二维码图片
excel
inxunoffice1 天前
批量删除 Excel 表格中的重复行
excel
程序员小远1 天前
Python+requests+unittest+excel实现接口自动化测试框架
自动化测试·软件测试·python·测试工具·职场和发展·测试用例·excel
inxunoffice1 天前
根据指定 Excel 模板将 Excel 明细数据生成新的 Excel 文档
excel