2013-01-15 45 views
-1

我想了解如何將已經打開的excel工作簿中的單元格複製到另一個文件中。我不只是想要一個代碼,我想要一個教程。我的問題是谷歌只給我論壇。有人可以用視頻提出一個很好的教程嗎?超級鏈接將有所幫助。建議使用Excel 2003 VBA視頻?

+0

這似乎很明顯,但你有沒有試過YouTube? –

+0

是的,所有出現的視頻都是基本的。沒有人告訴我如何從一個文件到另一個文件。他們都是,「這裏是如何從一個單元複製到另一個單元」,或者,「這裏是如何從一個單元複製到另一個單元」。我確實找到了一個視頻,但它只是打字而不解釋。我想了解當我完成時我在做什麼。 –

+0

這確實是一個相當簡單的概念。我可以給你寫一個非常簡單易用的代碼來向你展示一個答案,但是肯定有很多例子都是清晰和簡單的。 –

回答

3
Option Explicit 

Sub CopyFromOpenWorkbookToAnother() 

'declare variables 
Dim wkbCopy as Workbook, wkbPaste as Workbook 
Dim wksCopy as Worksheet, wksPaste as Worksheet 
Dim rngCopy as Range 

'set variables -> change the names to suit your data needs 
Set wkbCopy = Workbooks("WorkbookToCopyFrom.xls") 
Set wkbPaste = Workbooks("WorkbookToCopyTo.xls") 
Set wksCopy = wkbCopy.Sheets("SheetToCopy") 
Set wksPaste = wkbPaste.Sheets("SheetToPaste") 

Set rngCopy = wksCopy.Range("A1:A10") 'adjust to whatever range you need 
rngCopy.Copy wksPaste.Range("A1") 'adjust to wherever you want to paste 

End Sub