VBA:[Tips]別ブックのセルから値をコピーする

なにがどう

別のブックのセルから値をコピーして、アクティブシートに張り付けたい。

どうするのか

1.コピーしたいブックを開く
2.開いた後にコピーする
3.貼り付ける
Workbooks.Open "コピー元ブック名" 'フルパスで書く
Workbooks("コピー元ブック名").Worksheets("コピー元シート名").Range("コピー元セル").Copy 'コピー元
Workbooks("貼り付け先ブック名").Worksheets("貼り付け先シート名").Range("貼り付け先セル").PasteSpecial '貼り付け先

補足

Workbooks内のコピー元ブック名はブックの名前だけを書くこと
開くファイル名を指定しているため、フルパスで書くとエラーになる
ここの設定を間違えると、「インデックスが有効範囲にありません」エラーが表示される
最終更新:2015年05月01日 16:18