Access VBA質問箱 IV

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

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


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

485 / 9994

←次へ　｜　前へ→


	【12821】Re:帳票で階段状に塗り潰し

せいさん - 15/4/17(金) 18:14 -


	引用なし

	パスワード

かるびの様

何とかうまくいったようです
使っていておかしいところが出たらまた考えます

SELECT 受注リスト.加工順, 受注リスト.オーダーNo, 受注リスト.発注日, 受注リスト.発注担当者名, 受注リスト.品番図番, 受注リスト.品名, 受注リスト.部品発注数, 受注リスト.納期, 受注リスト.発注残数, 受注リスト.工程名, 受注リスト.形式寸法, 受注リスト.工程備考, 受注リスト.在庫数, 受注リスト.納期対応, 受注リスト.在庫対応, 受注リスト.進捗, 受注リスト.予定日数, IIf(IsNull([加工順]),"",DSum("予定日数","Q_工程MC","加工順<" & [加工順])) AS 累計, IIf(IsNull([予定日数]),"",IIf([加工順]=1,Mid(String(60,"■"),1,[予定日数]),IIf(IsNull([加工順]),"",IIf(IsNull([累計]),"",Space([累計]*2) & Mid(String(60,"■"),[累計]+1,[予定日数]))))) AS 表
FROM 受注リスト
WHERE (((受注リスト.工程名)="MC"))
ORDER BY IIf(IsNull([加工順]),1,0), 受注リスト.加工順, 受注リスト.納期, 受注リスト.納期対応 DESC;

こんな感じになりました
いろいろと
ありがとうございました

817 hits

▼

【12803】帳票で階段状に塗り潰し せいさん 15/4/11(土) 13:05