今日の日付を取得する †Date 'フォーマット指定 Format(Now(), "yyyy/mm/dd") 現在の日時を取得する †CDate(Now()) 日付間隔を求める †DateDiff(時間単位,日付1,日付2) d1 = CDate("2001/01/01") d2 = CDate("2015/12/31") MsgBox DateDiff("d", d1, d2) ' d2 - d1 MsgBox DateDiff("d", d2, d1) ' d1 - d2 ' 今日の日付と比較 MsgBox DateDiff("d", Date, d2) ' 今日からd2まで MsgBox DateDiff("d", d2, Date) ' d2から今日まで
日付の比較 †セルに =A1>B1 =A1>"2015/04/23"*1 =A1>DATE(2015,4,23) ★月額105円~/容量最大30GB/機能満載! ロリポップ!レンタルサーバー ★ コメント: |