有効期限の出し方で・・・

いつもお世話になってます。
有効期限の出し方で、月によって３１日の月もあれば３０日の月もあるし、２月は２８日ですよね。
有効期限=見積日+７ で計算するように設定しましたが、見積日が６月２５日だと＋７が有効期限だから６月３２日で３０日を越える事になりますよね？
その場合は、どうしたら良いのでしょうか？
宜しくお願いします。

No.3 ベストアンサー 回答者： yanmaa 回答日時： 2002/06/27 16:53

VBAでよければ

有効期限 = CDate(CDate(見積日) + 7)
で良いですよ。

見積日は[yyyy/mm/dd]などの日付に変換できる文字列である事

この回答へのお礼

こんにちは、yanmaaさん。
無事設定できました。
有難うございました。

お礼日時：2002/06/28 14:17

No.4 回答者： arara0123 回答日時： 2002/06/27 16:56

twingo さんこんにちは。

ACCESSということなので、有効期限のところに
=DateAdd("d",7,[見積日]) ですね。

この回答への補足

こんにちは、arara0123さん。
無事設定できました。
有難うございました。

今回は、VBAの方法(yanmaaさんの方)で設定しました。
でも、勉強になりました。
有難うございました。

補足日時：2002/06/28 14:18

No.2 回答者： onimotsu 回答日時： 2002/06/27 16:10

一般的には年月日の関数を使うと思います。

年月日＋７で自動的に７日後の年月日を表示するはず。

ご質問が何のデータベースを使用するのかわからないので
具体的に回答できません。

accessの操作については私はまったく分かりません。
あしからず。

この回答への補足

アドバイス有難うございます。
データーベースの種類を入れるのを忘れてました。
ACCESS2000です。

補足日時：2002/06/27 16:31

No.1 回答者： paz777 回答日時： 2002/06/27 16:09

すいません。

お使いのデータベースとか、ご使用ソフトとかは何でしょうか？

この回答への補足

すいません。OSとかを入れるのを忘れてました。
Windows2000/ACCESS2000を使用してます。
宜しくお願いします。

補足日時：2002/06/27 16:29