我们在对每周，每月，季度，年度等各区销售数据或者个人工作汇总时，会涉及将每个地区或者每个人的工作表汇总的情况，一个一个复制是可以的，但表格较多的时候每次都这样操作显然是很浪费时间的 ，这里介绍使用python批量将各单独的excel带格式复制到新表格的方法。
以下是某款APP每年各月的用户活跃情况表，我们需要将每年的数据汇总到一张总表格中，原始数据如下：

最近6年的原始数据表格

示例代码如下：

from win32com.client import Dispatch # 导入win32com模块
import os  # 导入操作系统模块
'''
复制Sheet页到另一个Excel文件
   filepath：要遍历的目录
   filelist：要复制的Excel文件列表
   targetfilename：新生成的Excel文件的名称
'''
def copysheet(filepath, filelist,targetfilename):
    excelapp = Dispatch('Excel.Application') # 创建Excel应用对象
    excelapp.visible = 1 # 此行设置打开的Excel表格为可见状态；忽略则Excel表格默认不可见
    targetfile = excelapp.Workbooks.Add() #新建Excel文件
    targetws_list = targetfile.Worksheets
    for filename in filelist:   # 遍历Excel文件列表
        filesplit = filename.split('.')
        if filesplit[-1] == 'xlsx' or filesplit[-1] == 'xls':  # 判断是否为Excel文件
            excelfile = excelapp.Workbooks.Open(filepath + '\\' + filename)  # 打开一个Sheet页
            ws = excelfile.Worksheets
            ws.Copy(None,targetws_list(1)) #跨表复制,插入到第一个Sheet页之后
            excelfile.Close(SaveChanges=1)
        else:
            pass # 占位符，不执行操作
    targetws_list[0].Delete()  # 删除默认创建的Sheet1
    targetfile.SaveAs(filepath + targetfilename)  # 保存Sheet页到新Excel文件中
    targetfile.Close(SaveChanges=1)  # 关闭Excel文件
    excelapp.quit()    # 退出Excel应用对象
'''获取指定目录下的文件
   filepath：要遍历的目录
   filelist_out：输出文件列表
   file_ext：文件的扩展名，默认为任何类型的文件
'''
def getfilenames(filepath='',filelist_out=[],file_ext='all'):
    # 遍历filepath下的文件
    for filename in os.listdir(filepath):
        if file_ext == '.xlsx':  # 遍历Word文档文件
            if os.path.splitext(filename)[1] in ['.xlsx','.xls']:
                filelist_out.append(filename) # 添加到路径列表中
        else:
            if  file_ext == 'all':  # 遍历全部文件
                filelist_out.append(filename) # 添加到路径列表中
            elif os.path.splitext(filename)[1] == file_ext:
                filelist_out.append(filename)  # 添加到路径列表中
            else:
                pass
    filelist_out.sort(reverse=True)  # 对列表进行排序
    return filelist_out  # 返回文件完整路径列表

if __name__ == '__main__':
    filepath = r"C:\data"  # Excel文件保存的路径
    copysheet(filepath, getfilenames(filepath, [], '.xlsx'), r'\近6年数据汇总.xlsx')  # 合并多个Sheet页

运行结果如下 ，能快速将各excel表汇总到一个总表中：

汇总后的年度数据

注：这里没有进行表格名字排序，或者重命名，后续更新~

参考资料：《python编程锦囊》明日科技。