Excel 2003復制工作表

Question

我有兩個xls文件：file1.xls和file2.xls

我想將文件“ file1.xls”的sheet1的內容復制到文件“ file2.xls”的sheet2中。

Answer 1

考慮類似：

Sub dural()
    Dim alpha As Workbook, beta As Workbook
    Workbooks.Open Filename:="C:\TestFolder\alpha.xlsm"
    Set alpha = ActiveWorkbook
    Workbooks.Open Filename:="C:\TestFolder\beta.xlsm"
    Set beta = ActiveWorkbook
    alpha.Sheets(1).Copy Before:=beta.Sheets(1)
End Sub