2014-09-04 81 views
0

我是VBA的新手,我正在尋找一段代碼,允許我選擇一個Excel文件,並導入第一個從該文件到工作簿(運行宏的工作簿)中的已命名工作表(已存在)中創建工作表。VBA - 將第一張工作表從已關閉的工作簿導入到活動工作簿中的已命名工作表

感謝

+0

在這個http://www.excel-easy.com/vba/examples/import-sheets.html – 2014-09-04 11:21:32

+0

看看那一個發球作爲一個很好的教程,但它會從固定的指定位置打開excel文件,然後將這些工作表添加到活動工作簿中最後一個工作表的後面。我真正的問題不在於文件的位置,但是如何將第一張圖複製到活動工作簿中的已命名圖紙上。 – MVAmorim 2014-09-04 11:38:06

回答

1

試試這個:

Sub KopyKat() 
    Dim sd As Worksheet, rd As Range 
    Set sd = ThisWorkbook.Sheets("Final Destination") 
    Set rd = sd.Range("A1") 
    filespec = Application.GetOpenFilename() 
    Set wb = Workbooks.Open(Filename:=filespec) 
    Sheets("Sheet1").Activate 
    Cells.Copy rd 
    wb.Close 
End Sub 
+0

就這麼簡單!那是我需要的。只是更改了表格(「Sheet1」)。激活表格(1)。激活並按照我想要的方式工作。謝謝 – MVAmorim 2014-09-04 12:18:46

相關問題