如何将未打开的Excel文件的内容复制到当前指定的工作表中

woxuewozai

各位老师，求助你们，F:\1\2\数据.xlsm是未打开的Excel文件，F:\1\2\3\  文件.xlsm是现在打开的文件，如何用VBA代码将将未打开的数据.xlsm的工作表A内容复制到文件.xlsm工作表B中。期待回复。要报酬也可以，感谢

hwc2ycy

直接用代码打开复制，然后关闭，

jb_008

1. Sub 复制()
   
2. 
   
3. 
   
4. 
   
5. Workbooks.Open "F:\1\2\数据.xlsm"
   
6. 
   
7. Sheets("a").Cells.Copy
   
8. 
   
9.   ActiveWorkbook.Close savechanges:=False
   
10.   
    
11. ThisWorkbook.Worksheets("b").Paste
    
12. 
    
13. 
    
14.    
    
15. 
    
16.         
    
17. 
    
18. End Sub
    
19. 
    

复制代码

woxuewozai

jb_008 发表于 2013-6-2 13:59

谢谢，可是代码报错啊，下标越界啊。