-1

既に開いている Excel ワークブックから別のファイルにセルをコピーする方法を学びたいと思います。コードだけではなく、チュートリアルが必要です。私が抱えている問題は、Google が私にフォーラムしか提供しないことです。誰かがビデオを使った良いチュートリアルを提案できますか? ハイパーリンクが役立ちます。

4

1 に答える 1

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
于 2013-01-15T19:00:06.153 に答える