开个贴讨论一下VBA怎样实现多核心处理大量数据（结论发表）

xiamen168

如，有10页工作表，每页有1万行x10列的数据，有没有办法实现CPU多核心同时处理，从而提高处理速度？

据说VBA是不支持多线程的，但是到底存不存在一些巧妙的方法来实现呢？
请大家一下来探讨
PS.我所知道有2种,但没有验证过，先听听大家的吧


该贴已经同步到 xiamen168的微博

更新如下内容：


此贴反映非常不错，简单总结一下，欢迎继续讨论和补充，谢谢！
也请法师和liucqa等大内高手们，把关一下下面内容。

【问题和前提条件】
不支持多线程n核心的EXCEL VBA语言，如何用最低成本（单台PC+EXCEL）
实现多表大数据量处理运算（表表之间无数据关联）。

【解决方法和猜想】

《最低成本法》
1.（单台PC+EXCEL）
VBA内嵌EXCEL内置函数（Application.WorksheetFunction），把负荷大的运算处理交给Win自动管理，自动利用多核资源，从而间接实现多线程，
如何实现要看具体的业务情况，且需要改造VBA代码，目前只有猜想没有实例。

2.（单台PC+EXCEL）
开多个Excel App，非多个工作表！
独立的Excel App中，VBA中需要使用DoEvents将处理控制权让给Win。
据法师意见有可能速度会暴降，但另据国外有种说法则只需1/n的运算时间）。
具体效果如何，还需验证。

3.（单台PC+EXCEL）
VBA调用WinAPI来实现多线程: CreateThread
此法跟具体的业务情况有关，如果只做简单数据运算的话,也许没有稳定性问题？！
参见stanleypan贴.

4.（单台PC+EXCEL）
VBA里面使用本身可以多线程的控件？
目前只有猜想，需要网友爆料。

5.（单台PC+EXCEL）
用excel2010的“强力数据透视表”来计算，
此法需结合具体业务，未验证。

《最简单法》
1.（单台PC+EXCEL+虚拟机）
数据多表拆分为单表，结合虚拟机运行，VBA不需要考虑多线程优化，
资源交给Win自动多线程管理，但此案另外需要虚拟机软件。

2.（单台PC+EXCEL+VB）
vba封装到Active DLL中并加入按钮，然后打开多个excel应用点击按钮运行。
参见guojianlin1985贴。此法已验证有效！

3.（单台PC+EXCEL+VB）
VB ActiveX exe（CreateObject）技术可以轻松的实现多线程处理.
参见liucqa贴。

4.（单台PC+EXCEL+VB）
移植VB编译出DOS命令行程序，同时运行n个，
Win自动帮你管理多线程。
VB编译有5倍提速效果，具体参照法师贴。

谢谢大家！！！

星剑所指

这个太专业了。完全是专业编程要考虑的。
要是有这么多数据业务要处理。
跟老板说要么购买专业软件 ，要么换一台超级电脑。
当然，没事有兴趣话，还是可以研究研究

星剑所指

当然还有一个方法，就是把一个工作簿表分成10个簿，分到10电脑处理数据，处理完了再合并成一个

张三李四

一万行10列就是一百万个数据，再算上10页就是一千万个数据。就一个个读到这些数据的话也不会占太多的时间吧。当然你去读一千万个单元格那就要花时间了。

xiamen168

星剑所指 发表于 2012-7-10 15:20
这个太专业了。完全是专业编程要考虑的。
要是有这么多数据业务要处理。
跟老板说要么购买专业软件 ，要么 ...

不对，现实中还真有这么大数据量要处理的应用地方，
但往往大家采用高成本的办法来处理，
其实EXCEL VBA还是非常强大滴

momoca2006

对VBA不是很懂，但是很想看看大神们怎么说

liucqa

打开10个application，每个application打开一个工作簿，去读取其中的1页

张三李四

liucqa 发表于 2012-7-10 15:32
打开10个application，每个application打开一个工作簿，去读取其中的1页

如果是我就买十台电脑同时干。

Zamyi

既然讨论，就要有诚意，就100万个数据，要说快就快，要说不可能快就不可能快。如，数据不多，只有101个数，求100个数任取N个，使和等于第101个数，也许答案只有一组，可是可以算死。

sscylh

张三李四 发表于 2012-7-10 15:33
如果是我就买十台电脑同时干。

兄弟好大气！！