OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
締切り
済み

指定年月の最終日を取得する関数

  • 困ってます
  • 質問No.222088
  • 閲覧数2303
  • ありがとう数4
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 52% (72/136)

おせわになります。

現在VBでシステムを開発中なのですが、
年と月を指定してその月の最終日を取得するという
関数を探しています。

よろしくお願いします。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全1件)

  • 回答No.1
レベル9

ベストアンサー率 63% (28/44)

お疲れ様です。 そのような関数はあるかどうかは知りませんが、求めることは出来ます。 考え方は、その年月の次の月の先頭日(n月1日)の前日は、その年月の末尾です。 (例   '// 求めたい年月   strDATE = "2002/02/21"   strDATE = DateAdd("m", 1, strDATE)  � ...続きを読む
お疲れ様です。
そのような関数はあるかどうかは知りませんが、求めることは出来ます。
考え方は、その年月の次の月の先頭日(n月1日)の前日は、その年月の末尾です。

(例

  '// 求めたい年月
  strDATE = "2002/02/21"

  strDATE = DateAdd("m", 1, strDATE)  '// 日付+1月する
  strDATE = Format$(strDATE, "YYYY/MM/") & "01"  '// +1月した日付の先頭日
  strDATE = DateAdd("y", -1, strDATE)  '// 次の月の先頭日の前日がその月の最終日 ※"y"は「年」ではなく「年間通算日」

(結果
  strDATE = "2002/02/28"

間違っていたらごめんなさい。
お礼コメント
takataka111

お礼率 52% (72/136)

早速のご返答ありがとうございました。

DateSerial(2001, 4 + 1, 1) - 1

以上のように求められるそうです。

ありがとうございました。
投稿日時 - 2002-02-21 14:17:56
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ