![]() |
![]() |
今日が第何四半期かを知るには? | VBA |
今日が第何四半期かは、DatePart関数 の一番目の引数に "q" を指定することによって知ることができます。 '次の式では1月1日から第一四半期が始まるものとして値が返されます。
DatePart("q", Date) '年度単位で4月1日からを第一四半期と考える場合には次のようにアレンジします。 DatePart("q", Date) + IIf(Month(Date) >= 4, -1, 3) ※この方法は、クエリー式や、フォーム/レポートのテキストボックスなどのコントロールソースとしても使うことができます。その場合には式の前に "=" を付け、さらに Date() のように後ろにカッコを付ける必要があります。 |
|||
この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......
T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。
スタンドアロンからSQL Server対応まで、オーダーメイドのシステムを短納期・安価でお届けします
|
Copyright © T'sWare All rights reserved | ![]() ![]() |