　複数のファイルをひとつのシートにまとめたい　

Question

■Excel2002で質問です。

　以下のような、決まったフォーマットを支店すべてにメールし、
　各支店の月ごとの製品売上げ数を報告してもらいました。
　それを、ひとつのシートにまとめるのに一番よい方法を
　ご教授いただけますでしょうか。
　勉強のため、Excelマクロ、Accessなど何でも問いません。
　　※なお、支店によっては、行を増やしてくるケースもあります。
　
　　　　　　　　1月　　2月　　3月　　4月
-----------------------------------------
札幌支店｜
-----------------------------------------
横浜支店｜
-----------------------------------------
大阪支店｜
-----------------------------------------

どうぞよろしくお願いいたします。

LOSSIGNOR · Accepted Answer

大変ですね。
私なら以下のようにやるかも。

【１】全支店からの返信されてきたシートをとりあえず、一つのブックにまとめる。

【２】シートが揃ったら、その先頭に空白シートを挿入し、シート名「集計」とする。

【３】以下のマクロを実行。
Sub Matome()

Dim p As Integer, q As Integer
Dim Ws1 As Worksheet
Set Ws1 = Worksheets("集計")

For p = 2 To Worksheets.Count
    　　　　　　　　　Worksheets(p).Select
        　　　　　　　q = 2
        　　　　　　　Do Until Cells(q, 1) = 0
            　　　　　　If Cells(q, 2) <> 0 Then
                　　　　Range(Cells(q, 1), Cells(q, 5)).Copy _
                　　    Ws1.Cells(Ws1.Cells(65536, 1).End(xlUp).Row + 1, 1)
            　　　　　　End If
        　　　　q = q + 1
        　　　　　　　Loop
Next p
Ws1.Select
Set Ws1 = Nothing
End Sub

【４】そしたら、とりあえず全店データ、特に、勝手に行を追加してきている支店（出張所を追加している店）も含めて、一覧が出てきます。

後は必要に応じて加工するとか。

※私も初心者ですので、もっともっとスマートな方法があるかもしれません。
他の方のご回答も参考にして、やってみてください。

n-jun · Answer

お恥ずかしながら、私からのアドバイスは出来かねるレベルです。

＞　（ほかの支店は関係ないので数値はブランクになっています）
＞　
＞　こういったファイルが一挙に集まっている状態で、
＞　そのファイルをすべて１つのシートに集約したいんです。
＞
＞ただ、支店によっては支店の中にさらに「出張所」の売り上げとして
＞行を増やしてくることがあります。
＞（＝フォーマットの体裁を変えてきてしまう）

本来決まったフォーマットを変更したり、何よりたくさんのファイルを
多分メールで受信し、あるフォルダに放り込んでから作業を行なうのでしょうが、
ファイル名・フォルダ名のつけ方等々と、増やした行の判別について悩むのなら
会社を巻き込んでどこかで作成をして貰った方が、あとあとのメンテも
楽になるように感じます。
（コストをかけないで、と言えば無理かも知れませんが、結構敷居が
高いと感じました）

n-jun · Answer

取り違えていたらごめんなさい。

各支店の各月の売上は１つのデータですから、
各支店から毎月売上を教えて貰い、１つのファイルに打ち込むのでは
ダメなんでしょうか？（支店が多すぎる？）

＞　以下のような、決まったフォーマットを支店すべてにメールし、
＞　各支店の月ごとの製品売上げ数を報告してもらいました。
ここの部分が私はよく分かってないのかも。

表は決まったフォーマットですか？
それともひとつにまとめたシートですか？

<Excel> 複数のファイルをひとつのシートにまとめたい

大変ですね。

お恥ずかしながら、私からのアドバイスは出来かねるレベルです。

取り違えていたらごめんなさい。

この回答への補足

似たような質問が見つかりました

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

<Excel>　複数のファイルをひとつのシートにまとめたい　