[リストへもどる]
一括表示

投稿時間:2004/05/20(Thu) 14:08
投稿者名:うまなり
Eメール:sonoda@ch.mbn.or.jp
URL :
タイトル:
日付の計算
文字列によって設定されている日付にたいして+1日、-1日といった
処理を行いたいのですが何かよい方法はございますか?
よろしくお願いします

Dim Date as string
Date = "20040520"
文字列データであるDateに対して、翌日の日付"20000521"(文字列)の
値を取得したいと思っています。

投稿時間:2004/05/20(Thu) 14:50
投稿者名:ちゃん
Eメール:
URL :
タイトル:
Re: 日付の計算
Format(DateAdd("d", 1, Format("20040520", "@@@@/@@/@@")), "yyyymmdd")
とか。

投稿時間:2004/05/20(Thu) 14:59
投稿者名:nobu
Eメール:
URL :
タイトル:
Re: 日付の計算
> Dim Date as string  <== エラーになるでしょう
> Date = "20040520"   <== エラーになるでしょう

Dim Date_org As String
Dim Date_new As String

Date_org = "20040520"
Date_org = Format(Date_org, "####/##/##")

Date_new = DateAdd("d", 1, Date_org)

Debug.Print Date_new

投稿時間:2004/05/20(Thu) 17:07
投稿者名:うまなり
Eメール:sonoda@ch.mbn.or.jp
URL :
タイトル:
ちゃんさん・nobuさんへ
まとめてのお礼で申し訳ありません。
お二人の回答を参考にさせていただき上手くいきました。
初歩的なことを聞きましてスイマセン。
これからは少し自分で悩む事をしようと思います。
ありがとうございました。