快速提取多个工作薄数据
企业做财务，下面分子公司很多，如何快速编制每月的合并财务报表？
企业做财务，下面分子公司很多，如何快速编制每月的合并财务报表？
企业做财务经理的时候，公司下面分子公司很多，如何快速编制每月的合并财务报表？其实这个问题，我的头条问答里面回答过相关类似的题目，只是没有解释如何编制。现在在这里我给大家说说如何自己制作一个在EXCEL里高效编制合并报表的小技巧，这里格式只要你制作好了，合并报表自然出来了，下面我为大家讲一讲。
1、EXCEL中对会计科目的设置。
在EXCEL中设置所有需要的会计科目的代号，也就是对这些科目对应编号。有些朋友说还不如直接用账套里面的一级科目编号，你们说的很对，可以直接用。
如图：我这个是按照拼音首字母设置代号的。
2、确定EXCEL中财务报表格式以及相应函数设置。
设置财务报表：按列将报表科目统一排列出来，如对应的B列所示；D列为报表数然后借方调整、贷方调整，调整数。。。。。
借方调整、贷方调整取数：直接用sumif函数，也就是说B列中某个单元格在“会计调整”工作簿中对应D列的所有数据求和。
会计调整：
只需要输入已设置的科目代码，相应的科目名称就用VLOOKUP直接把科目名称查找出来了，再写调整数就可以了，你只需要写代码及调整数据就行了，TB中的调整数据也自动过进来了。
3、基础工作完了，开始各母子公司数据汇总。
作为企业财务经理，你只需要设计制作这么一个表格，然后每月结账出报表的时候，要求集团及各分子公司按照你给的模板把报表数及附注数填在表格上，是不是节省了很多数据加工时间？
如图所示，母子公司每一列的报表数直接设置好链接数据就出来了，这个过程很快，设置链接后，每月都不用动表格，链接名称正确的话，数据直接出来，当然这个只是完全相加的数据，并未抵消。
4、合并抵消。
这个调整思路就跟前面的会计调整思路一样的了。这不一份合并报表出来了吗？然后每个月只需要替换之前的单体TB，通过公式自动生成，是不是很快？
总结：把报表格式设置好是前提条件，制作报表要简洁，越简单越清晰就越好，那样分子公司下面人员也更容易了解；公式设置好后一般不允许变动，否则可能出现调整错误；合并报表模板做好只是第一步，后面会计调整、合并抵消需要更专业的知识。
如有不懂设计合并模板的，可以私信我，我上述跟你讲解的是我自己审计工作中摸索的一套自己的方法，想了解合并报表编制、调整抵消需要注意什么，可以关注我，我是悟空做财务，谢谢大家！
怎么快速提取一个excel文件中的所有工作表名？
这里提供一个VBA的版本。楼主只需要打开EXCEL复制粘贴代码，点击运行后，同级目录里就会产生一个txt文档，文件里记录了所有sheet的名字。比较方便，可以试一试。
下面是演示的效果：
不管EXCEL怎么变，反正只要复制粘贴就好了，完全都不用改变。感觉还是挺好用的。详细的代码如下。图片附上了详细的注释。最下方可以直接复制代码。
下面可以直接复制：
Private Sub CreateTxtFile()
Dim fso As Object
Dim myTxt As Object
Dim MyFName As String
Dim i As Integer
Dim nowDate As String
Dim sht As Worksheet
nowDate CDate(Now())
nowDate Replace(nowDate, :