每年公司的行政人事部，都会对公司的活动经费进行规划，以及预算审核。
不同部门，在不同月份，活动经费的数额可能不同。
活动经费是指举办活动所需要各种开销的费用。例如组织参加活动的人员经费、场所经费、设备经费等所有针对活动的费用。
为了方便登记、查看、以及打印，他们会将表格制作成如下图的样子。
这样看起来比较直观，部分表哥表姐也喜欢把表格做成这种样式。
但是如果需要更快速地分析活动经费的分配情况，将其整理为一维表的格式，然后利用数据透视表分析，可能更加合适。
那如何整理上述数据呢？
如果你是 Office365 的话，可以直接使用 Vstack 函数，将不同的数据区域，按照竖直方向进行拼接。
=VSTACK一月,二月,三月,四月,五月,六月,七月八月,九月,十月,十一月,十二月)
注：对应区域事先做好了区域命名。
如果你不是 Office365，直接使用传统 Excel 函数做法，很难做出来。这时，就需要用到数据整理的利器 ——PoweQuery。
下面我来简单介绍一下它的做法。
温馨提示：本文会涉及几个简单的 M 函数，不会 M 函数的小伙伴也不用担心，大致有个印象就可以。
PQ 需要 Office2016 及以上版本。M 函数是 PQ 中所使用的函数。
1、具体操作
我们事先进行预处理操作，导入表，筛选去掉列中的表头和 null（空）值。
❶ 将数据导入到 PQ 编辑器中。
全选数据区域，在【数据】选项卡中，选择【来自表格 / 区域】-创建表-【确定】，进入 PQ 编辑器。
❷ 单击部门的筛选下三角，取消勾选【部门】和【null】，单击【确定】按钮。
对于多区域的表，利用 PowerQuery，我们可以按照多种形式进行合并，下面我介绍的做法是按照每一行的的方式，进行合并。
接下来，我们进行表格转换处理。
第一步：将行转 List
利用 Table.ToList，将表中的每一行形成 List。
Table.ToList：将表按行方向形成 List
=Table.ToList表,each _)将表中的每一行形成列表，each _ 可以对每一行进行进一步操作。
以下图为例，公式返回的结果中，列表中的每一行，就是表中每行所对应的数据。
第二步：移除每一行中的 null 值
List.RemoveNulls：移除列表中的 null
=List.RemoveNulls列表) 将列表中的 null 值删除掉
第三步：拆分每一个 list
我们可以看到每一个 List 之间，三个数据为一组。
所以我们直接利用 List.Split 函数将数据进行拆分处理。
List.Split：列表拆分
= List.Split列表,每次拆几个)
Split 是分开的意思，List.Split 的意思就是将列表按照每 N 个拆开，形成单独的 List。
第四步：转表
将每个 List 按行进行转表，这里我们用 Table.FromRows 函数（也可以用 Table.FromList）。
Table.FromRows：将 list 形成的列表转换为行方向的表。
=Table.FromRows(list 形成的列表，转换为表对应的字段)若第二参数未写，默认的表标题为 Column1，Columns2……
那我们需要的表标题，可以怎么样获取呢？
获取标题行，我们可以先用 Table.ColumnNames 获取标题的 List，然后 List.FirstN 取前三个标题。
Table.ColumnNames：获取表中的标题
=Table.ColumnNames表)可以获取表中的所有标题，返回一个 List
List.FirstN：获取列表中的前 N 个
=List.FirstN列表,前 N 个)
我们将写好的标题函数贴在，Table.FromRows 函数的第二参数上，此时就已经完成拆分后的转换，最后进行表合并即可。
第五步：合并
最后利用 Table.Combine 进行合并，到这里就完成了。
= Table.Combine( Table.ToList筛选的行, each Table.FromRows(List.Split(List.RemoveNulls(_),3), List.FirstN(Table.ColumnNames(源),3))))
Table.Combine：将列表中的多个 Table 表进行合并
= Table.Combine多个 Table 形成的 List)
将处理好的数据上传到表。
2、延伸拓展
上面讲的是按照每一行进行转换合并，那么按照每一列进行合并，这应该怎么做？
其实跟前面也是一样的思路，只不过使用的函数稍微有点变化。
如下图：
❶ 将表中每一列转换列表 (Table.ToColumns)，
❷ 移除 null 值 (List.Select)，
❸ 每 3 列进行拆分（List.Split），
❹ 列表循环 (List.Transform)，按列转表 (Table.FromColumns)，
❺ 最后合并 (Table.Combine)
= Table.Combine( List.Transform( List.Split( List.Select(Table.ToColumns筛选的行), each _{0}<>null), 3), each Table.FromColumns_,List.FirstN(Table.ColumnNames(源),3))))
3、写在最后
本文讲解的是，将间隔相同的多区域表，进行数据合并。
手动复制粘贴的做法可以是可以，但是数据更改后，无法自动更新。
利用 Office365 中新出的 Vstack 函数，我们可以将多个区域直接进行竖直方向的拼接。但是由于版本限制，大多数人是没有这个函数的。
数据整理，最常用的利器就是 PowerQuery。利用它，基础的界面操作就可以完成很多整理工作，但是稍微复杂一点点的，就得需要一丢丢 M 函数。
对于没有 M 函数基础的小伙伴，本文可能看得有点吃力，但是如果我们的数据规范的话，其实也并不需要搞这些。
所以大家平时最好规范一下数据的记录，这样就可以减少很多不必要的工作啦٩(๑・̀ω・́๑)۶。
本文来自微信公众号：秋叶 Excel （ID：excel100），作者：小爽，编辑：竺兰