VBA实现对多个excel文件复制黏贴到汇总表

代码在文件book_all.xls。最近一个同学想要写一段VBA代码实现以下功能（我简化了要求）：一个表中有很多个excel文件，每个文件有类似的表格，代码实现把每个文件的表格复制到另一个excel文件中。折腾开始...... 之前没搞过VBA，我用的是wps抢鲜版，不支持VBA，装了个office2003，终于可以跑VBA代码了，后来发现wps个人版也是可以跑vba的。下面上代码，业余写的，比较简单，路过勿喷......

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2015-12-15 22:50  VBA实现对多个excel文件复制黏贴到汇总表\
     文件       18432  2015-12-14 23:17  VBA实现对多个excel文件复制黏贴到汇总表\book1.xls
     文件        7680  2015-12-14 23:14  VBA实现对多个excel文件复制黏贴到汇总表\book2.xls
     文件       20992  2015-12-15 22:50  VBA实现对多个excel文件复制黏贴到汇总表\book_all.xls