エクセルにて多種の振り分け方、教えてください。

質問

入出庫をエクセルにてやっているのですが、
日付等、まちまちで入荷されるのでその分け方を教えてください。

セルAの１に日付、Bの１に入荷数、Cの１にロットナンバー、Dの１に在庫数。
セルEの１に日付、Fの１に出荷数、Gの１にロットナンバー、Hの１に在庫数。

を入力しているのですが、ロットナンバーが色々ありまして
同じ商品でも、ロットナンバーが違うと出荷順序が異なります。

そこで、ロットナンバーを打ち込むとその商品の
入出荷日＋在庫数が分かる方法を教えてください。

説明不足でしたら改めて補足させてもらいます。
よろしくお願いします。

回答No.2

zap35 · ベストアンサー

＃０１です。すみません訂正します
Ｊ１の式
=IF(MAX(INDEX(($C$1:$C$1000=$I1)*ROW($C$1:$C$1000),))=0,"該当なし",INDEX($A$1:$A$1000,MAX(INDEX(($C$1:$C$1000=$I1)*ROW($C$1:$C$1000),))))

Ｋ１の式
=IF(MAX(INDEX(($C$1:$C$1000=$I1)*ROW($C$1:$C$1000),))=0,"",INDEX($D$1:$D$1000,MAX(INDEX(($C$1:$C$1000=$I1)*ROW($C$1:$C$1000),))))

Ｊ１は最初39502のような数値が表示されると思います。セルの書式を「日付」に変更して下さい

お礼

ありがとうございました。
おかげさまで出来ました。

また何かありましたらよろしくお願いします。

回答No.1

zap35

どこかのセルにロット番号を入力したときに、その入力したロット番号でＣ列を検索して、一致する最終行の入荷日と在庫数を表示する方法です。

Ｉ１に検索するロットナンバーを入力し、Ｊ１に以下の式を入れると最終入荷日が表示されます。
=IF(MAX(INDEX(($B$1:$B$1000=$I1)*ROW($B$1:$B$1000),))=0,"該当なし",INDEX($A$1:$A$1000,MAX(INDEX(($B$1:$B$1000=$I1)*ROW($B$1:$B$1000),))))

Ｋ１に在庫数が表示する式は以下です
=IF(MAX(INDEX(($B$1:$B$1000=$I1)*ROW($B$1:$B$1000),))=0,"",INDEX($C$1:$C$1000,MAX(INDEX(($B$1:$B$1000=$I1)*ROW($B$1:$B$1000),))))

データは1000行目まであるものとして作りました。
質問の意図と合っていなかったらごめんなさい

補足

ありがとうございます。
さっそくやてみたのですが、「該当なし」とでてしまいます。
試しに、在庫数を入力してみたら、「Ｊ」に日付「Ｋ」にロットナンバーが出ました。
教えていただいたマクロのどこを変更すれば「J」に最終入荷日、
「K」に在庫数が出るようになるのでしょうか？？

教えてください。よろしくお願いします。