|
同様の質問があったとは思いますが、今の私の力では以下の動作を行うためのコードが編み出せません。
是非お力をお借りできればと思います。
<現状>
・日付(yymmdd形式)がついた、微妙に名前の違う日報がいくつかあり、ネットワークドライブのフォルダにある。
・とりまとめ用のファイルも、毎日作成するため、yymmdd形式の日付がついたファイルとなっている。
・ばらばらと点在した同じ日付のついた日報の特定のシートから、特定の範囲をコピーし、とりまとめ用に貼り付ける。
それが大変時間がかかるし、毎日の作業なので効率化を図りたい。
<やりたいこと>
・コマンドボタンなどをクリックすると、メッセージボックスが表示され、作成する日をyymmdd形式で入力するだけで、入力したのと同じ日付の日報から該当データをとりまとめ用のファイルにコピーしたい。
・ただし、日報のデータ範囲はシートごとに異なり、最後の1行が総合計となっているが、これは外してコピーしたい。
たとえば、A101206.xls、B101206.xlsが日報だとして、C101206.xlsにとりまとめるとすると、
A101206.xlsの「東京」シートのA1〜C10の範囲で、最終行以外(つまりA1〜C9まで)を、C101206シートの「東京」シートD1を基点に貼り付ける、という感じにしたいと思います。
(もうひとつのB101206.xlsは「大阪」と「名古屋」シートのデータを、C101206.xlsのそれぞれ「大阪」と「名古屋」シートに最終行以外の範囲を貼り付けます。)
データの行数が可変し、最終行以外を貼り付ける、というところがポイントになります。
せめてヒントだけでもいただければと思います。
ほんとに困っています。
なにとぞよろしくお願いいたします。
|
|