MSアクセスについて MSアクセスのテーブルに生年月日を入力すると、自動的に年齢というフィールドに自動入力されるようにしたいです。

Microsoft Access65閲覧

その他の回答(2件)

0

テーブルに入れただけでは何のイベントもないので、 そのテーブルをフォームで表示して、生年月日のテキストボックスを入れたら 年齢のテキストボックスに今日時点の年齢をVBAで計算してセットする ということはできます。 でも、今日時点の年齢で固定になってしまいますが、それは良いんですか? 明日誕生日の人がいて、今日入力したら20歳でも、明日には実際の年齢は21歳になっていますが、明日テーブルを開いても20歳のままになってしまいます。

0

現在の年から生まれ年を引く、さらに今年の誕生日が来ていなければ1引く。 Year(date())-year([生年月日])-iif(format([生年月日],“mm/dd”)<=format(date(),”mm/dd”),1,0) こんな感じじゃないかな。