Excel如何建立财务报表档案资料
网志图文版：
http://www.b88104069.com/archives/4332
上节介绍如何取得一家公司单一季度的三大财报，实际上进行财务分析，不仅会结合不同
财报或不同公司作垂直比较，也会横跨多个期间作水平比较，像这种情况，必须先把这些
财报都添加到数据库中，以下分享具体作法：
一、想取得三家公司三个年度第四季度的财务报表，如下表所示，后面新增一个字段“档
案名称”。
二、编写VBA程式码：
70~90：和上一节第四步骤类似，这里设计执行两次“Application.InputBox”，用意是
依序输入“A字段中的起始序号”和“A字段中的结尾序号”。
110~190：依照前面所输入的序号设计循环，依次根据清单序号上的公司代码、年度、季
度等资讯，定义VBA程式里的变量。
210~400：和上一节相同设定数列变量，接着利用集合循环取得财报。
420~500：定义变量“N”为想要储存的档案名称，先将此名称写入Excel工作表“Files”
的清单中第六栏，也就是“F”栏，同时也将此档案名称与电脑资料夹路径结合，然后把
前面从网页所取得三个财报工作表移动到新活页簿，将新活页簿储存在设定好的“Route
”路径名称并关闭，最后再循环执行下一个“i”。
三、执行宏程式，首先是输入储存格参照视窗，第一次是“A2”、第二次是“A9”，意
思是想一次取得1到9个财报档案，清单中的F栏本来保留空白，于程式执行后会自动填上
已储存的档案名称。
四、成功依照清单指示新增九个档案，这里要留意一点，如果是选择1到9，上一节留下来
的第一个档案最好删除，不然程式可能不知该怎么处理现有相同档案而中断报错，本来一
般程式会设计自动侦错及处理机制，这里简便起见并没有特别考虑这一点。
五、建立数据库之后，再来是编写取得数据库的程式，这里程式虽多，用法概念前面章节
都有介绍过了，其中一个新的开启活页簿：“Workbooks.Open Filename:=Route”，对于
读完这本书的程式功力基础而言，应该已是不难理解。
六、执行宏“Open_FR”，在出来的“请选择财报档案”视窗选择第一个档案，在目前
活页簿中先增一张工作表，将档案中的三张工作表一起复制到这个新增的工作表，得到同
一公司同一年度的资产负债表、损益表、现金流量表。
七、每个年度的报表会包含前比较，因此利用14年度和16年度的财务报表，可以简单进行
跨四个年度的财务分析。
一般提到大数据，指的巨量无法以传统方式处理的资料，这些资料并不是突然间出现，而
是电子数据日积月累起来的。对于个人而言，同样可以生活或工作中所需要的资料，利用
Excel储存起来，日积月累便是专属于个人的大数据数据库，视情况拿出来加以分析。以
财务报表为例，虽然可以野心很大，精心设计VBA循环将所有公开公司的财报一次下载，
但是这么一来，显然超乎Excel本身默认的计算能力，而且没有实质的分析效益，还是比
较建议用比较自然的方式，像这一节的范例，一次又一次地累积，建立自己特有的资料分
析库。
本文内容取自《人人做得到的网络资料整理术》，博客来书店网址：
http://www.books.com.tw/products/0010775391。
延伸阅读：
Excel如何取得多家公司财务报表
http://www.b88104069.com/archives/4317
Excel如何一次汇总比较三家公司财务报表
http://www.b88104069.com/archives/4321
Excel如何财务报表另存新档
http://www.b88104069.com/archives/4330