みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Access2013 年月日迄の経過年月日表示

Access2013で、備忘録作成の為、[年月日] をテーブルに短いテキスト形式で、
例20001205と初めの4桁を西暦、次の2桁を月、後の2桁を日で入力してあります。
『1952年11月27日』から、この年月日迄の、[経過年月日数] を自動的に表示させるクエリのフィールドへの記入式を教えて下さい。宜しくお願いします。

投稿日時 - 2019-07-12 13:00:16

QNo.9634576

困ってます

質問者が選んだベストアンサー

経過年数でよければ
経過年数: IIf(Format(#1952/11/27#,"mmdd")>Format(DateSerial(Left([年月日],4),Mid([年月日],5,2),Right([年月日],2)),"mmdd"),DateDiff("yyyy",#1952/11/27#,DateSerial(Left([年月日],4),Mid([年月日],5,2),Right([年月日],2)))-1,DateDiff("yyyy",#1952/11/27#,DateSerial(Left([年月日],4),Mid([年月日],5,2),Right([年月日],2))))

投稿日時 - 2019-07-12 19:35:54

ANo.2

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(3)

ANo.3

こんばんは
大の月、小の月、閏年があり、経過年月数というのはどうかと思います。
経過日数なら日付(シリアル値)の引き算で簡単ですが
・経過日数:日付-#1952/11/27#
テキスト形式の年月日を日付(シリアル値)に変換すには先ず年月日を
数値に変えてからDateSerial関数を使います
・V: Val([年月日])
・日付: DateSerial(Left([V],4),Mid([v],5,2),Right([V],2))

投稿日時 - 2019-07-13 02:51:43

お礼

ありがとうございます。

投稿日時 - 2019-07-13 11:42:49

ANo.1

年齢ではなくて
年数と月数と日数ということですか。48年0月8日とか。
もう一個の質問が終わったのでしたら締め切ってください。

投稿日時 - 2019-07-12 18:50:45

あなたにオススメの質問