#046 今月の1日の日にちを得るには? VBA

今月の1日の日にちを得るには、DateSerial関数 を使用します。

DateSerial関数は、年、月、日を別々に引数に指定することによって、それに対応したDate型の値を返す関数です。今月の1日の日にちを得るために、年の引数には Year(Date) によって現在日時の年の部分だけを与え、月の引数には Month(Date) によって現在日時の月の部分だけを与えます。そして、日の引数には常に "1" を与えます。
DateSerial(Year(Date), Month(Date), 1)



※この方法は、クエリー式や、フォーム/レポートのテキストボックスなどのコントロールソースとしても使うことができます。その場合には式の前に "=" を付け、さらに Date() のように後ろにカッコを付ける必要があります。
| Index | Prev | Next |



T'sFactory
Accessで動く生産管理DB
Ureru Express
Webで使う販売顧客管理
Access開発&アドバイス
DB開発やテクニカルアドバイス
Copyright © T'sWare All rights reserved