分散的数据传到一个EXCEL表格中

《分散的数据传到一个EXCEL表格中》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、如有侵权，请联系网站删除，仅供学习与交流分散的数据传到一个EXCEL表格中【精品文档】第2页如有侵权，请联系网站删除，仅供学习与交流分散的数据传到一个EXCEL表格中有时候有些数据，今天做一点，明天做一点，存放的地方也不一样，但要实时汇总。比如采购清单，是按生产任务单号存放，但中途可能会之前的数据追加，以增加工作表的方式增加。一年的所有数据都存在“E:生产任务单20162016物料需求表.xls”，并且此表的数据要求可以实时查询，以便跟进物料采购情况。以下说明如何把一个EXCEL“20160416”工作表的“单2_追加”的内容，增加到“E:生产任务单20162016物料需求表

2、.xls”的工作表“2016”里。1．打开保存好数据表格“20160416”，选中工作表的“单2_追加”，右键，点击“查看代码”2．把以下程序复制弹出的窗口中。Sub数据range测试()DimMypathAsStringMypath="E:生产任务单20162016物料需求表"ActiveSheet.UsedRange.CopyWorkbooks.Open(Mypath)Workbooks("2016物料需求表").Worksheets("2016").Range("A"&Workbooks("2016物料需求表").Worksheets("2016").Cells.Specia

3、lCells(xlLastCell).Row+1).SelectWorkbooks("2016物料需求表").Worksheets("2016").PasteWorkbooks("2016物料需求表").CloseTrueEndSub3．按F5执行程序，一闪而过，你会看到数据自己保存到“E:生产任务单20162016物料需求表.xls”。4．关闭表格“20160416”，不保存即可。这样一来，不用手动打开2016物料需求表.xls，还要进行区域复制，粘贴。【精品文档】第2页