Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4337 / 9994

←次へ　｜　前へ→


	【8904】Re:空室管理

Gin_II - 06/12/12(火) 23:40 -


	引用なし

	パスワード

テーブル：マンションマスタ
　フィールド：マンションID
　　　　　　　マンション名

テーブル：部屋マスタ
　フィールド：部屋ID
　　　　　　　マンションID
　　　　　　　部屋名

テーブル：入居者マスタ
　フィールド：入居者ID
　　　　　　　部屋ID
　　　　　　　入居者名
　　　　　　　入居年月日
　　　　　　　退去年月日

ってことですか？

であれば、

【マンションマスタ】
マンションID　　　　マンション名
1　　　　A
2　　　　B

【部屋マスタ】
部屋ID　　　　マンションID　　　　部屋名
1　　　　1　　　　101
2　　　　1　　　　201
3　　　　2　　　　101
4　　　　2　　　　201

【入居者マスタ】
入居者ID　　　　部屋ID　　　　入居者名　　　　入居年月日　　　　退去年月日
1　　　　1　　　　山田　　　　2004/05/20　　　　2007/03/20
2　　　　1　　　　加藤　　　　2007/10/03　　　　
3　　　　4　　　　佐藤　　　　2004/05/20　　　　2007/09/11
4　　　　4　　　　山本　　　　2007/11/02　　　　2009/03/30

【空室抽出】
SELECT 入居者マスタ.*
FROM 入居者マスタ
WHERE 入居者マスタ.[入居年月日]=DMax("入居年月日"
　　　　　　　　　　　　　　　　　 , "入居者マスタ"
　　　　　　　　　　　　　　　　　 , "部屋ID=" & [部屋ID])
　AND 入居者マスタ.退去年月日 Is Not Null;

で、

入居者ID　　　　部屋ID　　　　入居者名　　　　入居年月日　　　　退去年月日
4　　　　4　　　　山本　　　　2007/11/02　　　　2009/03/30

となりました。

312 hits

▼

【8897】空室管理 ヒロ 06/12/11(月) 20:53