【Excel报表】使用Excel配置报表的几个小技巧

一 工作表的合并

首先是合并工作表宏的使用。它会把当前工作簿里的所有Sheet里有数据的内容都复制到第一个“汇总”表里。代码如下：

Dim m As Integer
Dim n As Integer
Dim o As Integer
For m = 2 To 6
n = Sheets(m).[a65536].End(xlUp).Row
o = Sheets(1).[a65536].End(xlUp).Row
Sheets(m).Select
Range("a1", "z" & n).Select
Range("a" & n).Activate
Selection.Copy
Sheets(1).Select
Range("a" & o + 1).Select
ActiveSheet.Paste Next

另外需要注意其中的For m=2 To 6指的是合并从汇总表后的第二张工作表至第六张表中的数据。然后就是如何把几个Excel文档中的工作表（sheet） 合并到同一工作簿中的问题：很多时候我们需要将多个EXCEL表格的工作表合并在一个文档里面便于操作或者整理，有什么简单的方法呢？下面具体的看看如何把几个Excel文档中的工作表（sheet）合并到同一工作簿中1、打开需要合并的所有文档2、进入任一文档后，在工作表名处右键点击，选定"移动或复制工作表"3、选中需要合并的文件，然后选择需要放置的顺序，确定4、重复执行步骤三5、保存成XLS文件格式6、成功结果如上

二 Excel中如何批量复制数据到本列的下一单元格之前

[示例]如何把左边表的空白单元格自动填上变成右边表的样子

选其他这一列→按F5→定位“空值”→按下=号键→按下↑键→按Ctrl+Enter键。

即不用公式，也不用函数，按几个键就搞定。

三 Excel中如何批量添加空白行

有时我们会需要在excel表格中批量给已经做好的文档中添加空白行，少量的话可以手动添加，大量就无法操作了。1、在另外列中输入1，2，3，4，5，6....（ps：此法用下拉即可）2、在刚才做好的123456...列下面的空白行里添加1.5，2.5，3.5，4.5，5.5....(ps:类似上面方法下拉)3、选中所以行或者目标行，然后在“筛选和排序”里选择升序，即可。4、选择数据“升序”排序。5、删除用作排序的数字列或使用格式刷进行其他操作即可。