Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1014 / 9994

←次へ　｜　前へ→


	【12283】Re:特殊な並べ替え

かるびの - 13/2/17(日) 2:32 -


	引用なし

	パスワード

>Val(Year(DateSerial(Year([日付])+(Month([日付])<4),4,1)) & Format([コード],"0000")) 　よく思いつきましたねえ。　でも、年度を求めるだけなら、　　　Year([日付])+(Month([日付])<4) だけでいいのではないですか。　また、ORDER BY句も、　　　ORDER BY Year([日付])+(Month([日付])<4) 　　　　　　 , コード　　　　　　 , 日付だけでいいように思うのですが。　なお、年度を得る方法として、当該日付の３か月前の日の年を求めてあげるという方法もあります。　例えば、H25.03.31の３か月前はH24.12.31。この日の年はH24。　　　　　H25.04.01の３か月前はH25.01.01。この日の年はH25。　使う関数は、DateAdd関数とYear関数です。