Access2000 複数レコードを１つにするには・・・？

質問

お世話になります。
テーブルAに顧客の予約状況があります。
例えば、顧客ID「001」の人が１１月１０日と１１月１２日と１１月１５日なんて予約があって現在はそれぞれが１レコードとしてDBに格納され３レコード持っています。しかし紙に出力する際には１顧客１行にしたいので、どうにかこの３レコードを１レコードとする方法はないでしょうか？
DBレイアウトとしては顧客ID、予約１、予約２、予約３・・・のようにです。最大５つぐらいを想定しています。
VBAはなんとなくわかりますが、DAOなどはほとんどわかりません。

こんな説明でわかってもらえましたでしょうか？
是非、ご教授ください。

回答No.2

snoopy64 · ベストアンサー

■クエリ「Q予約日1」
SELECT 予約.顧客ID, Min(予約.予約日) AS 予約日1
FROM 予約
GROUP BY 予約.顧客ID
ORDER BY 予約.顧客ID, Min(予約.予約日);

■クエリ「Q予約日2」
SELECT 予約.顧客ID, Min(予約.予約日) AS 予約日2
FROM 予約 LEFT JOIN Q予約日1 ON 予約.顧客ID = Q予約日1.顧客ID
WHERE (((Q予約日1.予約日1)<>[予約].[予約日]))
GROUP BY 予約.顧客ID
ORDER BY 予約.顧客ID, Min(予約.予約日);

■クエリ「Q予約日3」
SELECT 予約.顧客ID, Min(予約.予約日) AS 予約日3
FROM (予約 LEFT JOIN Q予約日1 ON 予約.顧客ID = Q予約日1.顧客ID) LEFT JOIN Q予約日2 ON 予約.顧客ID = Q予約日2.顧客ID
WHERE (((Q予約日1.予約日1)<>[予約].[予約日]) AND ((Q予約日2.予約日2)<>[予約].[予約日]))
GROUP BY 予約.顧客ID
ORDER BY 予約.顧客ID, Min(予約.予約日);

■クエリ「Q予約日4」
SELECT 予約.顧客ID, Min(予約.予約日) AS 予約日4
FROM ((予約 LEFT JOIN Q予約日1 ON 予約.顧客ID = Q予約日1.顧客ID) LEFT JOIN Q予約日2 ON 予約.顧客ID = Q予約日2.顧客ID) LEFT JOIN Q予約日3 ON 予約.顧客ID = Q予約日3.顧客ID
WHERE (((Q予約日1.予約日1)<>[予約].[予約日]) AND ((Q予約日2.予約日2)<>[予約].[予約日]) AND ((Q予約日3.予約日3)<>[予約].[予約日]))
GROUP BY 予約.顧客ID
ORDER BY 予約.顧客ID, Min(予約.予約日);

■クエリ「Q予約日5」
SELECT 予約.顧客ID, Min(予約.予約日) AS 予約日5
FROM (((予約 LEFT JOIN Q予約日1 ON 予約.顧客ID = Q予約日1.顧客ID) LEFT JOIN Q予約日2 ON 予約.顧客ID = Q予約日2.顧客ID) LEFT JOIN Q予約日3 ON 予約.顧客ID = Q予約日3.顧客ID) LEFT JOIN Q予約日4 ON 予約.顧客ID = Q予約日4.顧客ID
WHERE (((Q予約日1.予約日1)<>[予約].[予約日]) AND ((Q予約日2.予約日2)<>[予約].[予約日]) AND ((Q予約日3.予約日3)<>[予約].[予約日]) AND ((Q予約日4.予約日4)<>[予約].[予約日]))
GROUP BY 予約.顧客ID
ORDER BY 予約.顧客ID, Min(予約.予約日);

■クエリ「Q予約日」
SELECT Q予約日1.顧客ID, Q予約日1.予約日1, Q予約日2.予約日2, Q予約日3.予約日3, Q予約日4.予約日4, Q予約日5.予約日5
FROM (((Q予約日1 LEFT JOIN Q予約日2 ON Q予約日1.顧客ID = Q予約日2.顧客ID) LEFT JOIN Q予約日3 ON Q予約日1.顧客ID = Q予約日3.顧客ID) LEFT JOIN Q予約日4 ON Q予約日1.顧客ID = Q予約日4.顧客ID) LEFT JOIN Q予約日5 ON Q予約日1.顧客ID = Q予約日5.顧客ID
ORDER BY Q予約日1.顧客ID;

上記6つのクエリを作成して、クエリ「Q予約日」を実行すると、ご希望の結果になると思います。
このクエリをレポートのレコードソースにすればいいでしょう。
頑張ってくださいヽ(^。^)ノ

回答No.1

taka_tetsu

>テーブルAに顧客の予約状況があります。

テーブルAはどんなレイアウトなのでしょうか？
主キーは？

>VBAはなんとなくわかりますが、DAOなどはほとんどわかりません。

クエリやSQLは解りますか？
VBAやDAO、ADOを極力使わないのでしたらクエリで何とかするしかないんですけど。

>しかし紙に出力する際には１顧客１行にしたいので、

紙とはどのような方法を想定していますか？
Accessのレポートのことですか？

>DBレイアウトとしては顧客ID、予約１、予約２、予約３・・・のようにです。最大５つぐらいを想定しています。

予約１～５の出力順は？