[已解决]怎么把一个工作薄中很多个工作表的内容表现一个工作表上

天马 · 发表于 2011-5-12 13:34

cyt381828864 发表于 2011-5-12 11:22
回复天马的帖子

哦，谢谢你了，看来我得努力学习VBA了，就是那个汇总按钮，按你上面的宏复制到我的工作表 ...

1、复制代码，在标签上点右键，打开VBE窗口，方法很多，这里只说一种，讲多了更晕。
2、打开你所需要的工作簿，如演示中的新工作簿
3、插入新工作表重命名“汇总”
4,打开VBE窗口，插入模块，在模块中粘贴复制的代码，在VBE中保存代码。
5、回到工作表，添加窗体按钮（可以命名，也可以默认），指定宏。
上次上传的代码，变量有些未定义，可能会报错，现更改，见附件中。

111.rar (36.91 KB, 下载次数: 191)

cyt381828864 · 发表于 2011-5-13 09:01

回复天马的帖子

谢谢你，我昨天倒腾了一晚上，把代码复制到我的表中，OK了，呵呵。这样节约了很多我复制粘贴的时间，不过的确因为不懂VBA，我验证是不是全部正确粘贴过来费了我不少时间，我要报名学习VBA了，加油努力学习！

liuxingfengbao · 发表于 2012-4-29 16:53

谢谢问题已解决谢谢问题已解决

ice_spirit · 发表于 2012-6-5 15:18

打个比方，如果工作表除了汇总工作表，我还要把20D的工作表内容页除去，也就是说在判断shname <> "20D"不是单一判断，还需要除去其他表，该如何执行，谢谢

lmyluk · 发表于 2012-9-24 16:43

兄弟，你的方法很好用，但是我要不包含表头该怎么弄啊？请指教啊，谢谢。

WANGL2 · 发表于 2012-9-25 13:55

天马发表于 2011-5-10 22:15
用VBA写了一个代码，你试试看。

最好写成通用代码。谢谢！

HLS711128 · 发表于 2013-5-29 17:48

谁帮一下忙，帮着将带人名的表内容合并到一个表中（查询表中）

HLS711128 · 发表于 2013-5-29 17:49

本帖最后由 HLS711128 于 2013-5-30 13:36 编辑

帮着改一下代码，谢谢

谷香 · 发表于 2013-7-5 16:56

今天刚好要用到这个代码，太感谢了

hntlcf · 发表于 2013-7-6 16:32

谢谢！

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

[已解决]怎么把一个工作薄中很多个工作表的内容表现一个工作表上

评分