概要
Access(2007-2016)で契約管理DBを作成しています。
顧客と契約している業務ごとに「継続」「休眠」「終了」の3つのフラグのうちどれか1つを割り当てているデータがあります。ここでフラグが「継続」だった場合、ボタンを押したときに来月分の契約情報を更新するVBAを書きたい(Accessに備わっている機能で解決できるならそうしたい)のですが、検索でなかなかヒットせず、こちらに質問させていただくことにしました。
以下、詳細になります。
テーブルとリレーション
〇使用テーブルは3つで、以下のようにリレーションを組んでいます。
1.T_クライアント---------------
クライアントID:オートナンバー
クライアント名:短いテキスト
顧客ID 顧客名
1 ○○商事
2 ○○電気
3 ○○通信
2.T_受注---------------
受注No:オートナンバー
受注日:日付
クライアントID:数値
受注No 受注日 クライアントID
1 2020/06/01 1
2 2020/06/01 2
3 2020/07/01 3
3.T_受注明細-------------
受注No:数値
業務内容:短いテキスト
契約月:日付
継続フラグ:短いテキスト(継続,休眠,終了の3択のコンボボックス)
受注No 業務内容 契約月 継続フラグ
1 クレーム処理 2020/06/01 休眠
1 営業代行 2020/06/01 継続
1 営業代行 2020/07/01 継続
1 営業代行 2020/08/01 継続
2 クレーム処理 2020/06/01 終了
3 定期清掃 2020/07/01 継続
3 定期清掃 2020/08/01 継続
###クエリ
以上のテーブルから、次のようなクエリを作成しました。
イメージとしては、1カ月単位の契約が、1クライアントに対して複数個生じている状態です。
例)○○商事は、6月は「クレーム処理」「営業代行」の2業務を契約していた
➡「クレーム処理」はフラグが「休眠」のため7月にもちこさない
➡「営業代行」はフラグが「継続」のため7月も契約継続
**ここで、フラグが「継続」になっているレコードのみ、ボタンを押すと「契約月」だけ+1したレコードを新しく追加したいと考えています。**ボタンはフォーム等に設置して、「継続」から「休眠,終了」になるレコードのフラグを毎月手作業で更新し、ボタンを押すような形式を考えています。
例)契約月 クライアント名 業務内容 継続フラグ
2020/08/01 ○○商事 営業代行 継続
↓
2020/09/01 ○○商事 営業代行 継続
初歩的な質問かもしれませんが、よろしくお願い致します。
回答2件
あなたの回答
tips
プレビュー