没看明白代码:
datasheet是怎么来的?
是dataExcel.GetSheet(sheetName)吗?

解决方案 »

  1.   

    是的,由于不同EXCEL文件之间调用之前在网上查的资料需要加一个限定
      

  2.   

    //使用VBA   将本workbook的sheet1,拷贝到book2.xls的最后一个sheet中 
    Private   Sub   CommandButton1_Click() 
        Dim   WB   As   Workbook 
        Dim   ReportFile   As   String 
        Application.ScreenUpdating   =   False 
        ReportFile   =   "c:\book2.xls " 
        Set   WB   =   Workbooks.Open(Filename:=ReportFile) 
        ThisWorkbook.Sheets(1).Copy   After:=WB.Sheets(1) 
        WB.Close   savechanges:=True 
        Application.ScreenUpdating   =   True 
    End   Sub 
    //自己将上面的语句改造一下 
    hope   it   helps
    引用来自 http://topic.csdn.net/t/20030621/14/1941643.html