Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1067 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8897】空室管理 ヒロ 06/12/11(月) 20:53 質問[未読]
【8899】Re:空室管理 Gin_II 06/12/11(月) 21:47 発言[未読]
【8901】Re:空室管理 ヒロ 06/12/12(火) 9:59 発言[未読]
【8902】Re:空室管理 ヒロ 06/12/12(火) 10:06 回答[未読]
【8904】Re:空室管理 Gin_II 06/12/12(火) 23:40 回答[未読]
【8905】Re:空室管理 ヒロ 06/12/13(水) 16:35 お礼[未読]
【8906】Re:空室管理 Gin_II 06/12/13(水) 17:59 回答[未読]
【8907】Re:空室管理 ヒロ 06/12/13(水) 18:54 お礼[未読]
【8908】Re:空室管理 ヒロ 06/12/14(木) 10:51 質問[未読]
【8909】Re:空室管理 Gin_II 06/12/20(水) 17:52 回答[未読]
【8934】Re:空室管理 ヒロ 07/1/4(木) 21:22 質問[未読]
【8935】Re:空室管理 Gin_II 07/1/5(金) 12:05 発言[未読]
【8941】Re:空室管理 ヒロ 07/1/6(土) 17:19 お礼[未読]
【8897】空室管理
質問  ヒロ  - 06/12/11(月) 20:53 -
引用なし
パスワード
   はじめまして
初めてですので今後ともよろしくお願いいたします。

空室のみマンション名と部屋名を表示したいのですが表示できません。
部屋は入退室されますが、入居者マスタにレコードごとに入力ています。
又、入居者IDはオートナンバーです。

マンションマスタ・・マンションＩＤ、マンション名
部屋マスタ・・・・・部屋ID、部屋名
入居者マスタ・・・・入居者ＩＤ、入居者名、入居年月日、退室年月日

マンション名・・・Ａマンション、Ｂマンション
部屋名・・・・・・１０１、１０２・・・

例、Ａマンション　１０１　山田　2004/5/20（入居）　2007/3/20（退室）
　　Ａマンション　１０１　加藤　2007/10/3（入居）
　　Ｂマンション　２０１　佐藤　2004/5/20（入居）　2007/9/11（退室）
　　Ｂマンション　２０１　山本　2007/11/2（入居）　2009/3/30（退室）
　Ｂマンション２０１のみが空室と表示したいのです。

皆様よろしくお願いいたします。
【8899】Re:空室管理
発言  Gin_II  - 06/12/11(月) 21:47 -
引用なし
パスワード
   > マンションマスタ・・マンションＩＤ、マンション名
> 部屋マスタ・・・・・部屋ID、部屋名
> 入居者マスタ・・・・入居者ＩＤ、入居者名、入居年月日、退室年月日

これって、テーブル構成ですよね？　省略してます？
誰が、どのマンションのどの部屋に入っているのかつながりませんよね？？
【8901】Re:空室管理
発言  ヒロ  - 06/12/12(火) 9:59 -
引用なし
パスワード
   ▼Gin_II さん：
>> マンションマスタ・・マンションＩＤ、マンション名
>> 部屋マスタ・・・・・部屋ID、マンションＩＤ、部屋名
>> 入居者マスタ・・入居者ＩＤ、部屋ＩＤ、入居者名、入居年月日、退室年月日
>
>これって、テーブル構成ですよね？　省略してます？
>誰が、どのマンションのどの部屋に入っているのかつながりませんよね？？

ＧＩＮ＿ＩＩさん
ありがとうございます。
そうですね。リレーション忘れていました。
ごめんなさい。
部屋マスタはマンションＩＤ、入居者マスタは部屋ＩＤでリレーションしています。
よろしくお願いいたします。
【8902】Re:空室管理
回答  ヒロ  - 06/12/12(火) 10:06 -
引用なし
パスワード
   ▼ヒロ さん：
>▼Gin_II さん：
>>> マンションマスタ・・マンションＩＤ、マンション名
>>> 部屋マスタ・・・・・部屋ID、マンションＩＤ、部屋名
>>> 入居者マスタ・・入居者ＩＤ、部屋ＩＤ、入居者名、マンション名、部屋名、入居年月日、退室年月日
>>
>>これって、テーブル構成ですよね？　省略してます？
>>誰が、どのマンションのどの部屋に入っているのかつながりませんよね？？
>
>ＧＩＮ＿ＩＩさん
>ありがとうございます。
>そうですね。リレーション忘れていました。
>ごめんなさい。
>部屋マスタはマンションＩＤ、入居者マスタは部屋ＩＤでリレーションしています。
>よろしくお願いいたします。

再度ごめんなさい。

入居者マスタにはマンション名、部屋名も入れています。
又、入居者マスタの今回不要なものは省いています。
よろしくお願いいたします。
【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

となりました。
【8905】Re:空室管理
お礼  ヒロ  - 06/12/13(水) 16:35 -
引用なし
パスワード
   ▼Gin_II さん：
>テーブル：マンションマスタ
>　フィールド：マンション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
>
>となりました。

ありがとうございます。
クエリとモジュールで入力しましたが、入力ミスと思いますが、()が無いとか
式がおかしいとかが出てうまく作動しません。
がんばって再度、挑戦いたします。
初心者ですので今後ともよろしくお願い申し上げます。
【8906】Re:空室管理
回答  Gin_II  - 06/12/13(水) 17:59 -
引用なし
パスワード
   >クエリとモジュールで入力しましたが、

クエリのSQLビューで、コピペすれば動くと思います。
＃テーブル情報とかがまったく同じであれば。
【8907】Re:空室管理
お礼  ヒロ  - 06/12/13(水) 18:54 -
引用なし
パスワード
   ▼Gin_II さん：
>>クエリとモジュールで入力しましたが、
>
>クエリのSQLビューで、コピペすれば動くと思います。
>＃テーブル情報とかがまったく同じであれば。

ありがとうございました。
お蔭様で空室を表示できました。
本当に助かりました。
今後ともよろしくお願いいたします。
【8908】Re:空室管理
質問  ヒロ  - 06/12/14(木) 10:51 -
引用なし
パスワード
   ▼ヒロ さん：
>▼Gin_II さん：
>>>クエリとモジュールで入力しましたが、
>>
>>クエリのSQLビューで、コピペすれば動くと思います。
>>＃テーブル情報とかがまったく同じであれば。
>
>ありがとうございました。
>お蔭様で空室を表示できました。
>本当に助かりました。
>今後ともよろしくお願いいたします。

誠に申し訳ないですが空室を表示できたと喜んだのですが、
私のミスで異なったクエリを開いて（空室が重複表示される）
出来たと思ってしまいました。
お教えいただいたプログラムを正式にコピーして貼り付けをいたしました
ところ「演算子がありません」との表示が出ました。
自分なりに本を見てあれこれといたしましたが、うまくいきません。
度重なるミスで申し訳ないですがご指導のほどよろしくお願いいたします。
【8909】Re:空室管理
回答  Gin_II  - 06/12/20(水) 17:52 -
引用なし
パスワード
   【8904】Re:空室管理 06/12/12(火) 23:40

での条件では、こちらでも試した結果です。
そちらの条件に変更（フィールド名とか）したのであれば、そこに
間違いはないですか？
【8934】Re:空室管理
質問  ヒロ  - 07/1/4(木) 21:22 -
引用なし
パスワード
   ▼Gin_II さん：
>【8904】Re:空室管理 06/12/12(火) 23:40
>
>での条件では、こちらでも試した結果です。
>そちらの条件に変更（フィールド名とか）したのであれば、そこに
>間違いはないですか？

明けましておめでとうございます。
今年もよろしくお願い申し上げます。
私も同じ条件で新たにテーブルを作成し、クエリのＳＱＬにコピーしたのですが、
やはり同じです。アクセス自体の条件付けなどされておられますでしょうか？
【8935】Re:空室管理
発言  Gin_II  - 07/1/5(金) 12:05 -
引用なし
パスワード
   > 【空室抽出】
> SELECT 入居者マスタ.*
> FROM 入居者マスタ
> WHERE 入居者マスタ.[入居年月日]=DMax("入居年月日"
> 　　　　　　　　　　　　　　　　　 , "入居者マスタ"
> 　　　　　　　　　　　　　　　　　 , "部屋ID=" & [部屋ID])
> 　AND 入居者マスタ.退去年月日 Is Not Null;

これを、そのままコピーじゃ、エラーになりますね ^^;
見やすいように、全角スペースでインデントをつけてます。

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

半角スペースにしてやれば、大丈夫だと思います。
【8941】Re:空室管理
お礼  ヒロ  - 07/1/6(土) 17:19 -
引用なし
パスワード
   ありがとうございました。
お蔭様で目的に到達いたしました。
正月早々から本当にありがとうございました。
DMAXの関数で出来るとは夢にも思いませんでした。
頭が固いですね。笑わないでくださいね。
又、大変勉強になりました。今後ともよろしくお願い申し上げます。
▼Gin_II さん：
>> 【空室抽出】
>> SELECT 入居者マスタ.*
>> FROM 入居者マスタ
>> WHERE 入居者マスタ.[入居年月日]=DMax("入居年月日"
>> 　　　　　　　　　　　　　　　　　 , "入居者マスタ"
>> 　　　　　　　　　　　　　　　　　 , "部屋ID=" & [部屋ID])
>> 　AND 入居者マスタ.退去年月日 Is Not Null;
>
>これを、そのままコピーじゃ、エラーになりますね ^^;
>見やすいように、全角スペースでインデントをつけてます。
>
>【空室抽出】
>SELECT 入居者マスタ.*
>FROM 入居者マスタ
>WHERE 入居者マスタ.[入居年月日]=DMax("入居年月日"
>　　　　　　　　　　　　　　　　　 , "入居者マスタ"
>　　　　　　　　　　　　　　　　　 , "部屋ID=" & [部屋ID])
>　AND 入居者マスタ.退去年月日 Is Not Null;
>
>半角スペースにしてやれば、大丈夫だと思います。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1067 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078210
(SS)C-BOARD v3.8 is Free