找回密码
  注册[Register]
查看: 1024|回复: 7

[vc] 自动汇总所有excel表的数据到一张总表上

  [复制链接]
发表于 2019-12-20 07:06 | 显示全部楼层 |阅读模式
禁止求评分、诱导评分、互刷评分、互刷悬赏值,违规者封号处理。
禁止发布推广、邀请码、邀请链接、二维码或者有利益相关的任何推广行为。
所有非原创软件请发布在【精品软件区】,发帖必须按照本版块版规格式发帖。


场景:发出一个excel模板要求相关员工(人数非常多)根据模板提报数据,汇总的时候需要一个个表格打开,然后复制黏贴数据到汇总表上,费时费力。或者导入VBA模块。
既然学了python,就把python用上了,一段代码自动完成汇总。


  1. import os
  2. from openpyxl import load_workbook

  3. #更新数据函数
  4. def update_sta(filename):
  5.     wb_fen=load_workbook(filename)
  6.     wb_zong=load_workbook('总表.xlsx')
  7.     sh_fen=wb_fen['shuju']
  8.     sh_zong=wb_zong['shuju']
  9.     maxrow_fen=sh_fen.max_row
  10.     maxrow_zong=sh_zong.max_row
  11.     maxcolumn_fen=sh_fen.max_column
  12.     for m in range(2,maxrow_fen+1):
  13.         for n in range(97,97+maxcolumn_fen)
  14.             n=chr(n)
  15.             i='%s%d'%(n,m)
  16.             j='%s%d'%(n,m+maxrow_zong-1)
  17.             cell_fen=sh_fen[i]
  18.             sh_zong[j].value=cell_fen.value
  19.     wb_zong.save('zong.xlsx')
  20.     print('更新的文件为:',filename)
  21.     wb_fen.close()
  22.     wb_zong.close()

  23. #读取文件夹中提交的所有数据表并更新
  24. path=os.listdir(r'C:\Users\Desktop\excelautomation')#分表/汇总表都在一个文件夹下
  25. for p in path:
  26.     if p !='总表.xlsx' and p !='excel表汇总.py':
  27.         update_sta(p)
  28. print('更新完毕!')
复制代码


如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2019-12-20 07:06 | 显示全部楼层
谢谢大佬
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 07:12 | 显示全部楼层
谢谢分享
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 07:12 | 显示全部楼层
6666666666
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 08:12 | 显示全部楼层
好的,非常感谢
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 08:27 | 显示全部楼层
6666
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 08:48 | 显示全部楼层
谢谢大牛
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

发表于 2019-12-20 09:01 | 显示全部楼层
感谢楼主分享
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【热心值】和【牛币】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 有用 没用

使用道具 举报

您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

RSS订阅|手机版|小黑屋|广告投放|大牛论坛

GMT+8, 2024-5-15 20:45 , Processed in 0.040211 second(s), 17 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表