質問: 複数のエクセルファイルを1つのエクセルファイルのシートにコピーをマクロ 複数のエクセルファイルを1つのエクセルファイルのシートにコピーをマクロで行いたい。 マイドキュメントのデーターというフォルダ内に エクセルファイルa(シート名みかん) エクセルファイルb(シート名りんご) エクセルファイルc(シート名バナナ) エクセルファイルd(シート名ぶどう) エクセルファイルe(シート名いちご) があります。 雛形は同じです。すべてa列~f列までデータが入っています。 行数はファイルによって違います。 また毎日自動で上書き更新され、毎日行数が変わります。 エクセルファイルzがあります。シートが7個あります。 ・変換 ・集計 ・みかん ・りんご ・バナナ ・ぶどう ・いちご エクセルファイルzを開きます。(各シートには昨日のデータが貼り付けてあります。) マイドキュメントのデーターフォルダも開いておきます。 エクセルファイルzにおいて「マクロの記録」を起動。 エクセルファイルzの 【みかん】~【いちご】までの5シートを全データdeleteします。 開いてあるフォルダ「データー」の中からエクセルファイルaを開きます。 (タスクバーにいます) ファイルaのシート【みかん】の全データ選択して エクセルファイルzの【みかん】というシートのa1セルにカーソルを あわせて貼り付けします。 開いてあるフォルダ「データー」の中からエクセルファイルbを開きます。 (タスクバーにいます) ファイルbのシート【りんご】の全データ選択して エクセルファイルzの【りんご】というシートのa1セルにカーソルを あわせて貼り付けします。 これと同じ操作を【バナナ】【ぶどう】【いちご】も行います。 エクセルファイルzにおいて「マクロの記録」を終了させます。 マクロができあがりました。 ファイルzを上書き保存して終了。再立ち上げで記録したマクロを実行。 エラーにはなりませんが、ファイルzの5種類各シートに ファイルa~eのデータが貼りつきません。 何か無理な事をしているのでしょうか? もしかしてシート名が同じだと駄目?とためしにファイルzのシート名【みかん】~【いちご】を 【みかんz】~【いちごz】に変更してマクロを再記録しても 駄目でした。 よろしくお願いします。
回答: 最初、aブックが開いている状態から、マクロ保存したのではありませんか。bやcを開く時と違う記述です。 zブック開いてマクロ実行すると、aブック開いてコピー、zブックに貼付け、bブック開いてコピー、zブックに貼付け、のように開くのもマクロでおこなう。 記述確認してみて下さい。