史上最牛VBA：15分钟内批量下载所有上市公司EXCEL格式财务报表

1、15分钟是指在网络比较畅通的条件下。我用的是公司的网络，经测试使用了15分钟。本文件运行时会对网速形成较大负荷，请谨慎使用。（事实上，我在程序中已经设置了每下载一个文件后便暂停0.1秒）。

2、表格的格式为EXCEL，下载后每家上市公司会有资产负责表、利润表和现金流量表三个文件，文件中数据涵盖上市以来披露的季报、半年报和年报中的数据。文件均以证券代码命名，分存在三个文件夹中，总共约有7500个EXCEL文件。


3、程序的原理是从新浪财经上下载数据。新浪财经上的财务报表数字有一个缺点是只能精确到千，但一般情况下是够用的。


对于没有万德之类数据库，又需要做一些数据分析的屌丝们，这个程序非常实用。
只需要再写段简单的VBA，即可将导出的数据全面整合，或导入到自己建立的数据库中。


有时候觉得新浪太伟大了，不过如果大家都这么个搞法，不知道新浪的服务器会不会崩溃。哈哈


[hide][/hide]