エクセルで複数のシートから、データを取り出し、一覧表を作成。

エクセルで複数のシートから、あるデータを取り出し、別のシート（又はブック）に一覧表を作成することはできますか？

シート１　東京支店
　　　Ａ　　　Ｂ　　　Ｃ
１東京支店　
２
３　　　　　　　　　 50

シート２　大阪支店
　　　Ａ　　　Ｂ　　　Ｃ
１大阪支店　
２
３　　　　　　　　　 30

新シート(又は新ブック)
　　　Ａ　　　Ｂ　　　Ｃ
１東京支店 50　
２大阪支店 30
３　　　




　

No.7 回答者： Wendy02 回答日時： 2005/10/23 22:10

こんばんは。

#4のWendy02です。

＞異なるシートが１００枚程度ある場合としてご教示ください。

やはり、「統合」には変わりないですが、VBAになります。
1つずつ探して足したのでは、話になりませんが、VBAにするには、データが不足しています。私としては、octet様のご反応しだいです。

No.6 回答者： imogasi 回答日時： 2005/10/23 21:24

＃３です。

－－－－－－
＃３で
>＞あるデータを取り出す
の「あるデータ」を「選択」」「抜き出し」する、ＩＤや特徴はなんでしょうか
と質問したが、＃５の補足で、答えてもらっていないが、各シートの定位置のデータを集めるらしいと推定した。
ーーーーー
ＶＢＡで
Sub test01()
Dim sh As Worksheet
i = 1
For Each sh In ActiveWorkbook.Worksheets
If sh.Name <> "Sheet4" Then
Worksheets("Sheet4").Cells(i, "A") = sh.Cells(1, "A")
Worksheets("Sheet4").Cells(i, "B") = sh.Cells(3, "C")
i = i + 1
MsgBox sh.Name
End If
Next
End Sub
上記を標準モジュールに貼り付け、「Ｓｈｅｅｔ４」は集めるシートですが、本番で集めるシートのシート名に合わせて変えて、実行してください。

No.5 回答者： takachan7272 回答日時： 2005/10/23 17:13

No.１です。

すみません、勘違いです。
新シートに支店名が入っているものと勘違いしてしまいました。

私の方法では出来ません。

この回答への補足

皆様のご回答に御礼申し上げます。
異なるシートが１００枚程度ある場合としてご教示ください。

補足日時：2005/10/23 20:12

No.4 回答者： Wendy02 回答日時： 2005/10/23 15:04

こんにちは。

C列にあったものは、C列になりますが、標準で、データ－「統合」を使えばできます。
最初に、新シート（または新ブック）で、「統合」を実行し、それぞれの範囲を追加して、左端列にチェックを入れ、「OK」をクリックすればできます。
ただし、同じものがあれば、合計になります。

新シート(又は新ブック)
　　　Ａ　　　Ｂ　　　Ｃ
１東京支店　　　　　 50　
２大阪支店　　　　　 30
３　　　

No.3 回答者： imogasi 回答日時： 2005/10/23 14:06

＞複数のシートから

＞別のシート（又はブック）に一覧表を作成する
は意味が判ります。
＞あるデータを取り出す
の「あるデータ」を「選択」」「抜き出し」する、ＩＤや特徴はなんでしょうか
。
ＸＸ支店に対応するＣ列は２行下の行と決まっているのでしょうか。
●ＶＢＡを使わないと難しいと予想します。
●ＶＬＯＯＫＵＰ関数の「範囲」は、複数シートを範囲指定できるか、ＯＫＷＥＢで他の質問が今出ていて、可能という回答は出ていません。ＭＡＴＣＨ関数の検査範囲は、複数列を指定することもできません。

No.2 回答者： kiichi_go 回答日時： 2005/10/23 13:58

新シートのB1に　=Sheet1!C3、 B2に=Sheet2!C3の式を入れただけではだめですか？

No.1 回答者： takachan7272 回答日時： 2005/10/23 13:53

VLOOKUP関数で可能です。