臨時用到VBA，做一個需求：把不在同一個檔案中的資料複製到一個檔案中。

新建過程，如下：

Sub 複製行()
    Dim mybook As Workbook
    Set mybook = Workbooks("2011明細表.xls")
    
    Dim target As Workbook
    Set target = Workbooks("詳單.xls")
    
    mybook.Sheets("sheet1").Rows(6).Copy target.Sheets("sheet2").Cells(1, 1)
    
    Set mybook = Nothing
    Set target = Nothing
End Sub
 

Cells(1,1)也可以用Range("A1")來表示，更直觀。

一開始，執行時總會報錯“下標越界”，最後發現是不支援sheet為中文，改成英文就OK了。

另外一點是需要把兩個檔案都開啟，這個還沒找到怎麼處理。