[分享]多个工作薄数据汇总到一个工作表中！

shanyue · 发表于 2005-11-4 09:55

我下载的是你一楼的第二个附件，说实话，我看不懂你的程序，

也不知道在哪里改。我现在能找到代码，你说的是不是有明细的哪个汇总表呀。

我把你的汇总表和我的30个工作表放在一个目录里，每个工作簿只有一个工作表，工作表的名称都是shett1,表中第一行都是表头，这个汇总表能不能自动寻找所有的同一目录下的工作簿，也就是不能一个个地选了，

还请楼主百忙中解答，

感谢不言中！！！

kwong · 发表于 2005-12-8 17:00

VERY GOOD

youusatst · 发表于 2005-12-26 16:43

多看了楼主的帖子后水平会提高的

xiaobenhai · 发表于 2005-12-26 17:03

可以为多个工作表创建一个级联菜单，这样就能在一个工作簿中看到多个工作簿中的数据。

bright002 · 发表于 2006-1-5 08:55

楼上的能不能做一个附件穿上来供大家参考一下啊？

zhuqqq180329 · 发表于 2006-1-18 12:13

楼主你好，请你帮个忙，可以把明细汇总的那个程序改成按列排序的吗？现在的是从头到尾按行直接下来的，怎么样才能按列汇总呢？比如一个表的数据是123 另一个是234

现在的程序结果是 123 能不能改成 123234 这样呢？
234

谢谢你

yjfxh · 发表于 2006-1-18 15:15

第39楼你好:EXCEL报表汇总可以完成多种类型的报表汇总，关于运用EXCEL报表汇总进行这类汇总,其实很简单,主要是通过数据连接桥中的连接功能,将EXCEL表格与数据库连接后,再将需要汇总的表格通过上面纵联数据表功能,将这些表拼凑生成一个动态的虚拟表,然后通过上面查询语句生成任意的汇总结果,上面有演示以及一些例表,如果还有什么需要咨询的,可直接留话或发短信给我13852682369

huangtaoccb · 发表于 2006-1-19 23:49

以下是引用[I]Long_III[/I]在2005-11-3 8:38:00的发言：[BR]
sht.Range(sht.Cells(2, 1), sht.Cells(a, b)).Copy Chjs.Cells(m, 2)
这句里的2表示第二行，到a行，你的标题是3行的行，这里就改为4，最开始的m = 2，也要改为4
这里是复制标题的sht.Range(sht.Cells(1, 1), sht.Cells(1, b)).Copy Chjs.Cells(1, 2)，改为1～3行

不好意思，比较菜，看不明白，是不是把这句加上去？加到哪一行？？

GUCHENGRONG · 发表于 2006-2-15 15:29

博大精深!!

cnlijian · 发表于 2006-3-30 19:52

很好的合并程序,谢谢!

		自动登录	找回密码
密码			免费注册