質問: workbooks("bookb.xlsm").sheets("sheetb").range(cells(21, 5), cells(370, 11)).value どこがおかしいのでしょうか? 実際はいくつかのファイルから複数の場所をコピーしないといけないので、r1c1書式で指定したいのですが、どうしたらいいでしょうか?
回答: (vbaでなく)excelの機能で、コピーしたいシートのシート見出しを右クリックしメニューの「移動またはコピー」を実行し、ダイアログボックスの「移動先ブック名」リストで「(新しいブック)」を選択し、(コピーの場合「コピーを作成する」チェックボックスをオンに、移動ならオフのまま)「ok」で選択したシートだけが新しいブックになる。 sub sample2() sheets("*").copy end sub http://officetanaka.net/excel/vba/tips/tips170.htm