各位有没有什么好办法，把汇总表的数据复制到其他表中（表头顺序不一样）

a569421 · 发表于 2018-12-10 20:27

本帖最后由 a569421 于 2018-12-12 16:55 编辑

各位有没有什么好办法，把汇总表的数据复制到其他表中，但是表头数据不一样。
之前用过公式数据多了会比较卡，有没有什么合适的VBA来解决这个。

模板.zip (64.26 KB, 下载次数: 9)

朱荣兴 · 发表于 2018-12-10 23:29

提示: 作者被禁止或删除内容自动屏蔽

a569421 · 发表于 2018-12-11 13:32

朱荣兴发表于 2018-12-10 23:29
字典匹配的典型案例，先留个足印吧

版主大大回复了~~~

朱荣兴 · 发表于 2018-12-11 15:59

提示: 作者被禁止或删除内容自动屏蔽

朱荣兴 · 发表于 2018-12-11 16:00

提示: 作者被禁止或删除内容自动屏蔽

a569421 · 发表于 2018-12-11 16:28

朱荣兴发表于 2018-12-11 16:00

刚刚试了真的可以非常感谢！！！如果模板那几个表数据表在第四个工作簿需要更改什么吗？

a569421 · 发表于 2018-12-11 16:29

朱荣兴发表于 2018-12-11 16:00

就是这样的

朱荣兴 · 发表于 2018-12-11 17:15

提示: 作者被禁止或删除内容自动屏蔽

a569421 · 发表于 2018-12-11 17:42

朱荣兴发表于 2018-12-11 17:15
With wb.Worksheets(1)

太感谢了！！！

a569421 · 发表于 2018-12-12 10:24

朱荣兴发表于 2018-12-11 15:59
Sub 按模板拆分()
Application.ScreenUpdating = False
Set d = CreateObject("scripting.dictionary")

有一个问下想再咨询一下如果第一列没有数据后面就不会复制了么？有办法改一下吗

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

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-12-10 23:29 来自手机 \| 显示全部楼层 [广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★免费下载 ★ ★ 使用帮助★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-12-11 15:59 \| 显示全部楼层 [广告] ★用Excel做企业管理系统，Excel服务器学习和下载★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-12-11 16:00 \| 显示全部楼层 [广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★免费下载 ★ ★ 使用帮助★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-12-11 17:15 \| 显示全部楼层 [广告] ★会Excel,就能做支持PC、手机、Web、App、Windows、安卓、IOS、Linux信息一体化的各种管理系统 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报