请教一个问题，为什么同样的VBA代码有时半天不动

chengsijing

我最近在用VBA做一些数据处理。碰到一个很奇怪的现象。

同样的代码，电脑，系统等外部环境都不变。
我写有几个sub，有不同的功能，单个sub执行都不到10秒，
举例sub a 处理Sheets(1)表单，单独运行5秒，sub b 处理Sheets(2)表单，单独运行10秒，
我为了方便联动，在sub a最后，直接又调用call另外一个sub b （或者新建一个sub c，里面就两行代码 call sub a和sub b），结果运行就很慢了，运行速度不是5+10秒，而是变成600秒。
有谁碰到过这种问题？ 什么原因造成的？
我电脑配置很高，移动工作站，i7-12800HX的CPU，pcie4的固态硬盘，128G的DDR5内存。WIN11专业工作站版,office 专业增强版2021。打开任务管理器，CPU和内存使用率都不高，应该不是硬件的问题。

Yalishanda30

不明白，光看描述瞧不出来啥毛病

smsn

你来炫耀电脑的吧

LIUZHU

电脑配置描述得这么丰富，代码到底是什么的只字不提

chengsijing

正确的说法应该是这样，我写有几个sub，例如单个sub执行都不到10秒，如果我偷懒为了联动，在一个sub里，调用call另外一个sub，结果运行就很慢了，运行速度不是1+1，而是变成*10倍的时间。

chengsijing

Yalishanda30 发表于 2023-3-26 19:35
不明白，光看描述瞧不出来啥毛病

同样的代码，电脑，系统等外部环境都不变。
我写有几个sub，有不同的功能，单个sub执行都不到10秒，
举例sub a 处理Sheets(1)表单，单独运行5秒，sub b 处理Sheets(2)表单，单独运行10秒，
我为了方便联动，在sub a最后，直接又调用call另外一个sub b （或者新建一个sub c，里面就两行代码 call sub a和sub b），结果运行就很慢了，运行速度不是5+10秒，而是变成600秒。
有谁碰到过这种问题？ 什么原因造成的？

chengsijing

LIUZHU 发表于 2023-3-26 22:16
电脑配置描述得这么丰富，代码到底是什么的只字不提

正确的说法应该是这样，我写有几个sub，有不同的功能，例如单个sub执行都不到10秒，如果我偷懒为了联动，在一个sub里，直接又调用call另外一个sub，结果运行就很慢了，运行速度不是1+1，而是变成*10倍的时间。
这样是什么原因？

Yalishanda30

chengsijing 发表于 2023-3-27 02:25
同样的代码，电脑，系统等外部环境都不变。
我写有几个sub，有不同的功能，单个sub执行都不到10秒，
举 ...

有这功夫把你代码贴出来啊，光看你描述怎么知道问题在哪

ChangeKing7

用arr试试 别操作单元格

chengsijing

找到原因了。因为生成的数据我默认都用公式，数据一多，公式之间互相计算就慢了。我直接根据公式把结果在VBA里面计算，把结果输出来，这样就快了，几十万条数据10秒内搞定。