[已解决]求助 求一段根据时间匹配粘贴数据的VBA代码

xfyj2009

各位大神，有个问题请大家帮忙，请不吝赐教。共有两张sheet，sheet1中有一列数据是根据输入的日期自动在报表提取得到，sheet2是汇总列表，如何实现按时间在sheet2中匹配粘贴。即我输入2017-1-2后，excle可直接将sheet1中生成的数据列（指定区域）复制到2017-1-2那一行。以此实现每日提取报表并汇总的自动化过程。求代码。

最佳答案

月排行榜 / 总排行榜

liyizhe000

2017-2-23 10:57

xfyj2009 发表于 2017-2-23 10:43
你用的是数组方式，解决了我的问题，谢谢

如果对你有帮助，请设置为最佳答案！谢谢！

跳转到最佳答案楼层

liyizhe000

上传个附件看看

xfyj2009

好的，请帮忙看看怎么实现

liyizhe000

xfyj2009 发表于 2017-2-21 10:15
好的，请帮忙看看怎么实现

附件已上传，请下载查看

xfyj2009

liyizhe000 发表于 2017-2-21 10:49
附件已上传，请下载查看

感谢你的帮助。不过我可能没表述清楚，我是希望根据输入日期将数据源表sheet中那列数据复制粘贴到汇总表sheet相应日期那一行。非常感谢

liyizhe000

没错啊，就是根据日期，把对应的数据复制过去

xfyj2009

是将SHEET2中那列数据复制到汇总表sheet2相应位置（对应日期）。正好反过来了

liyizhe000

xfyj2009 发表于 2017-2-21 16:14
是将SHEET2中那列数据复制到汇总表sheet2相应位置（对应日期）。正好反过来了

早上没注意，代码重新给你写了一遍，现在应该符合条件了！

xfyj2009

你用的是数组方式，解决了我的问题，谢谢

liyizhe000

xfyj2009 发表于 2017-2-23 10:43
你用的是数组方式，解决了我的问题，谢谢

如果对你有帮助，请设置为最佳答案！谢谢！