Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

工作中常用的Excel函数公式,全印在一张超大鼠标垫上
查看: 161|回复: 4

如何将多个EXCEL中固定单元格的值汇总分别列到总的大表上

[复制链接]
发表于 2021-9-23 16:57 | 显示全部楼层 |阅读模式
麻烦问下论坛里的各位大神,就是现在有一张数据汇总的大表,里面吸收存款的数据来源是下面各个EXCEL表格中固定的比如H8的值,现在就要求把每年的H8数据自动汇总到汇总大表的对应项目,求各位大神帮助小弟解决一下~

求大神帮助.rar

30.25 KB, 下载次数: 6

发表于 2021-9-23 17:59 | 显示全部楼层
大致是这个样子

  1. Sub sdaf()
  2. Dim xx, sr, wb As Workbook
  3. Dim s As Double
  4. Application.ScreenUpdating = False
  5. xx = Application.GetOpenFilename("excel文件,*.xlsx", , , , True)
  6. If Not VBA.TypeName(xx) = "Boolean" Then
  7.     For Each sr In xx
  8.         Set wb = Workbooks.Open(sr)
  9.         s = s + wb.Sheets(1).Range("H8")
  10.         wb.Close False
  11.     Next
  12. End If
  13. ThisWorkbook.Sheets(1).Range("a1").Value = s
  14. Application.ScreenUpdating = True
  15. End Sub
复制代码
回复

使用道具 举报

发表于 2021-9-23 18:45 | 显示全部楼层
祝順心,南無阿彌陀佛!


demo.rar

44.16 KB, 下载次数: 4

回复

使用道具 举报

 楼主| 发表于 2021-9-23 18:49 | 显示全部楼层
cutecpu 发表于 2021-9-23 18:45
祝順心,南無阿彌陀佛!

大神不好意思您可能理解错我的意思了,我要的不是将这些数据加合做到那个单元格里,而是将每个H8的单元格的值复制到对应的一列,比如19年9月的H8复制到汇总表格中的A1单元格,19年8月的H8复制到汇总表格中的A2单元格,这样子,求大神再帮小弟看一看~
回复

使用道具 举报

发表于 2021-9-23 19:07 | 显示全部楼层
爱吃鱼的毛毛毛 发表于 2021-9-23 18:49
大神不好意思您可能理解错我的意思了,我要的不是将这些数据加合做到那个单元格里,而是将每个H8的单元格 ...

祝順心,南無阿彌陀佛!

demo2.rar

44.83 KB, 下载次数: 13

回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2021-10-20 08:08 , Processed in 0.839511 second(s), 9 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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