エクセル－ワークシートのコピー方法

質問

検索してみたのですが、自分で解決することができなかったので質問させていただきます。

毎日作成されるエクセルファイルがあり、そのファイルには１４枚のワークシートがあります。
このパターンは毎日同じです。

今回、このファイルの中の１つのワークシートだけを必要としている部署があり、このワークシートだけを拾い出して１年分（３６５枚）を別のファイルにコピーしたいのですが、
なにかよい方法はありますでしょうか？

３６５個のファイルを一つずついちいち開けてワークシートをコピーするしかないでしょうか？

ちなみにそのファイルは
フォルダ「日報」→
フォルダ「2005」「2006」・・・→
フォルダ「1月」「2月」・・・→
日にち別にファイルが一つずつある状態です。

コピーしたワークシートは月ごとにまとめてファイルしたいと思っています。

ちなみに、当方マクロやＶＢＡにあまり詳しくありません・・・。

回答No.3

HeavensCat

シートはセルの集まりですので参照の基本的なやり方は同じだと思います。
ただ、一年３６５日分のシートを一つのファイルにまとめるのは無理を感じます。
現在あるファイルをデータベースと考えて、提出用の新たなフォーマットを作成してデータを参照する関数を並べることを検討されたほうが結局は近道のように思います。
別の良い方法がお判りになりましたらまた教えてください。

お礼

HeavensCatさま、たびたびすみません。

自分のイメージがなかなか伝わらないようで
己の文章力のなさを痛感します。

ＶＢＡの参考書を本屋でチラっと見てきましたが
一定の作業をマクロで記録して工夫すれば
なんとかなるような気がしてきたので
人に頼らず、自分で勉強してみようと思います。

回答No.2

HeavensCat

その抽出したいデータが特定のセル番地に格納されているなら簡単に実現できます。
Excelは他のシートを下のような書式で参照できます。

=+[ファイル名.xls]シート名!$A$1

これらは文字列ですので、ファイル名やシート名をセルに書き込んで=CONCATENATE()関数でつないでやればよいです。

A B C D E　　　　　F
1 =+[　　ファイル名.xls　　　]　　　シート名　　!$A$1　　CONCATENATE(A1,B1,C1,D1,E1)

この場合はＢ列とＤ列だけを変化させたものを縦に並べて書いておきＦ列を下にコピーするだけです。

上記の説明でお判りでしょうか？

お礼

HeavensCatさま、
たびたびの回答ありがとうございます。

私は先ほど、間違った説明をしてしまいました。

「特定のデータ」というのは特定のワークシート丸ごと１つという意味でした。
このデータが含まれているワークシートだけを１年分コピーしたかったので
今回の場合は利用できなさそうです。

しかし、これはこれでとても使えそうなので
別の機会にCONCATENATE関数を使ってみたいと思います。

ご協力ありがとうございました。

回答No.1

HeavensCat

私の使っているExcel2000ではsheetは255までしか使えませんが、nomimonoさんの環境では365枚のシートが使えますでしょうか？

マクロを使わずにやるとなりますと一枚一枚コピーするしか手はないと思いますが、たとえマクロを用いて実現したとしてもそのファイルを用いてどのような作業をお考えでしょうか？
最終的に行いたい作業を検討してから最も相応しい編集方法を決めるほうが良いと思います。

お礼

現状のファイルの中には１４種類（１４枚のワークシート）の日報データがありますが、
その中の特定の一つのデータのみを１年分、外部に提出することになっています。

外部に出すので知られたくないデータが入っているワークシートは除かなくてはいけません。

ファイルは１日分が１ファイルで３６５個になってもよいし、
ひと月分ずつまとめて月別のファイルにしてもよいのですが、
とにかく３６５枚分の日報を出すことになります。

ファイルの中のワークシートを
新しいファイルにコピーできる方法があればなぁと思ったのですが
とりあえず現段階では私にそのような力量はないので
地道にコピーしていこうと思います。

わかりにくい質問ですみませんでした。
回答、ありがとうございます。