エクセル 複数条件抽出

質問

先日、複数条件でのデータ抽出を教えていただき対応できましたが
別条件でのデータ抽出が必要になりました。

画像添付します。

納入個数は６個×使用個数です。
同一品番のものが毎日納入され、注文数に達したら次の行になります。

たとえば
行番２の机Cは使用個数３、注文数90なので、2/5～18個ずつ納入され2/9で90個完了
行番3の机Cも使用個数3、注文数90なので、行番２の納入が終わった次の2/13～18個ずつ納入され2/17で90個で完了
行番４の机Cも使用個数3、注文数120なので、行番３の納入が終わった次の2/19～18個ずつ納入され2/27に12個で完了です。

行番5の机Fは使用個数2で注文数40なので、2/5～12個ずつ納入され最終日は２/8に４個で完了です。
行番６の机Fも使用個数２で注文数40ですが、行番5が2/8に4個で終わってるので、8個からスタートで2/14に８個で終了
行番7の机Fも使用個数2で注文数60です。行番6が2/14に8個で終わっているので4個からスタート・・・
という繰り返しです。

これが300行くらいあるので、手打ちでは効率悪すぎるしミスもでるので、関数でできないかというご相談です。。。
品番、使用個数、注文数が絡んでいます。ご教授いただけますようお願い致します。

回答No.4

SI299792 · ベストアンサー

間違いでした。
=MIN($D2*2-SUM(D2:$D2),$A2*6)-SUMIF($B$1:$B1,$B2,E$1:E1)
です。前の式でもできますが、余計なものが付いているのでこっちのほうがいいです。

お礼

前回といいお世話になります。
すみません。ご指摘のとおりS9が10でそこから値が狂っています・・・
手入力だとこうなります・・・

そうなんです。前回より納入日がなくなりました。
前回教えていただいた関数を駆使したんですが、全然できませんでした・・・（泣
今回教えていただいたとおりに入力してできました！感動です。
本当に本当に毎回助かります。今後ともよろしくお願いします。

回答No.3

SI299792

前回より、納入日が無くなったのですね。
E2に
=MAX(MIN($D2*2-SUM(D2:$D2),$A2*6)-SUMIF($B$1:$B1,$B2,E$1:E1),0)
右下へコピー。

S8が 2なのに、なぜS9が12になるのかわかりません。
ルールに従えばS9は10になるはずです。
手作業による入力ミスだろうと判断しました。
そうでないなら、S9が12になる理由を書いてさい。

回答No.2

bunjii

質問の文言と添付画像に差異があります。
図示　→　論理値
S9=12　→　S9=10
U9=６　→　U9=8
U10=6　→　U10=4
W10=2　→　W10=4
論理値の結果で良いとすれば品番毎に4つの数式を用意しなければならないようです。

机Cのとき
E2=A3*6
F2=IF(AND($D2>SUM($E2:E2),E2<>""),MIN($A2*6,$D2-SUM($E2:E2)),"")
F2セルを右へW2セルまでコピーします。
E3=IF($A3*6=SUM(E$2:E2),"",$A3*6)
E3セルを下へE4セルへコピーします。
F3=IF($A3*6=SUM(F$2:F2),"",IF($D3>SUM($E3:E3),MIN($A3*6,$D3-SUM($E3:E3)),""))
F3セルを右へW3セルまでコピーし、F3:W3の範囲を下へW4までコピーすれば良いでしょう。

机Fのとき
机Cに倣って下記の数式を範囲内の目的のセルへ配置すれば良いでしょう。
E5=A5*6
F5=IF(AND($D5>SUM($E5:E5),E5<>""),MIN($A5*6,$D5-SUM($E5:E5)),"")
E6=IF($A6*6=SUM(E$5:E5),"",$A6*6)
F6=IF($A6*6=SUM(F$5:F5),"",IF($D6>SUM($E6:E6),MIN($A6*6,$D6-SUM($E6:E6),$A6*6-SUM(F$5:F5)),""))

お礼

すみません。ご指摘のとおりS9が10でそこから値が狂っています・・・
手入力だとこうなります・・・

いただいた回答で表記したいとおりの表ができました！
関数の内容はこれから理解したいと思います（汗
ご回答ありがとうございました！！

回答No.1

HohoPapa

9行目は、10,12,8
10行目は、4,12,4　ですよね。

課題を関数で解決できるか考えてみましたが
私にはできそうもありません。

VBAを持ち込むことができますか？
持ち込めるようなら、
解を提示できるだろうと思います。

お礼

すみません。ご指摘のとおりS9が10でそこから値が狂っています・・・
手入力だとこうなります・・・
VBAは苦手で（関数も苦手ですが）なんとか関数でご回答いただけたのでそちらでトライします。ありがとうございました。