エクセルの使い方

質問

エクセルの使い方で質問します。

シート１で集めたデーターをシート２で集計を取りたいと思います。

シート２では一部でしか入力されていないのですが、シート１で入力すれば自動でシート２に入力する方法はありますか？

関数やマクロを使えばよろしいのでしょうか？

回答No.3

KURUMITO

例えばシート1ではＡ2セルにドングリの文字があり、下方にその種類と合計の文字が、それより下の行には容器の文字とその種類があるとします。
それらの右側には、すなわちＢ列には、個数が入力されているとします。もちろん個数はすべての種類に入力さている必要はありません。空白のままのセルもあります。なお、ドングリの横には個数、容器の横には個数の文字があるとします。
そこで作業列としてＣ2セルには次の式を入力して下方にオートフィルドラッグします。
=IF(B2="","",IF(ROW(A2)<=MATCH("合計",$A:$A,0),MAX(C$1:C1)+1,IF(ROW(A2)=MATCH("容器",$A:$A,0),MAX(C$1:INDIRECT("C"&MATCH("合計",$A:$A,0)))+2,IF(ROW(A2)>MATCH("容器",$A:$A,0),MAX(C$1:INDIRECT("C"&ROW(A2)-1))+1,""))))
次にシート2ではＡ2セルに次の式を入力してＢ2セルまでオートフィルドラッグしたのちに下方にもオートフィルドラッグします。
=IF(ISERROR(INDEX(Sheet1!$A:$B,MATCH(ROW(A1),Sheet1!$C:$C,0),COLUMN(A1))),"",INDEX(Sheet1!$A:$B,MATCH(ROW(A1),Sheet1!$C:$C,0),COLUMN(A1)))
これによりシート2にはお望みの表が完成します。
この方法の良いところはシート1でのドングリや容器の種類が多くの行(任意の行範囲）に入力されていても個数が入力されなければシート2では除かれることはもちろんですが、ドングリの種類とその個数が表の上から連続して入力されていなくても、途中に空白の個数があっても正しくシート2に表示されることでしょう。

回答No.2

MackyNo1

ご質問の趣旨は、Sheet1のデータシートのＣ列に個数データが入力されているものだけ集計表に表示したいという意味でしょうか？

その場合はＳｈｅｅｔ２のＢ１８セル（ドングリの名称を入力したいセル）に以下の式を入力し、右方向に２つ下方向に適当数オートフィルしてください。

=INDEX(Sheet1!B:B,SMALL(INDEX((Sheet1!$C$15:$C$22="")*100+ROW($C$15:$C$22),),ROW(A1)))&""

同様にＢ２７セルに以下の式を入力し同様にオートフィルコピーしてください。

=INDEX(Sheet1!B:B,SMALL(INDEX((Sheet1!$C$26:$C$28="")*100+ROW($C$26:$C$28),),ROW(A1)))&""

回答No.1

tom04

こんばんは！
参考になるかどうか判りませんが・・・
一例です。

↓の画像で説明させていただくと
Sheet1にデータを入力すれば、その品目が表示され、合計数がB列に表示されるようにしています。

尚、合計欄は今後データが増えても良いように、
別列に表示させてみました。

「容器」に関しても同様の方法になりますので、
品目のみの方法を回答してみます。

Sheet1のC列を作業用の列とさせてもらい、
C2セルに
=IF(OR(COUNTBLANK(A2:B2)>0,COUNTIF($A$2:A2,A2)>1),"",ROW(A1))

という数式を入れ、オートフィルで下へずぃ～～！っとコピーします。

そして、Sheet2のA2セルに
=IF(COUNT(Sheet1!$C$2:$C$100)<ROW(A1),"",INDEX(Sheet1!$A$2:$A$100,SMALL(Sheet1!$C$2:$C$100,ROW(A1))))

B2セルに
=IF(A2="","",SUMIF(Sheet1!$A$2:$A$100,A2,Sheet1!$B$2:$B$100))

という数式を入れ、A2・B2セルを範囲指定し、B2セルのフィルハンドルで
下へコピーすると画像のような感じになります。

そして、合計欄のC2セルは
=SUM(B:B)
という数式を入れています。

これでSheet1に新たにデータを入力するたびにSheet2に反映されると思います。

尚、数式は100行まで対応できるようにしていますが、
データ量によって範囲指定の領域はアレンジしてみてください。

以上、参考になれば幸いですが
他に良い方法があれば、読み流してくださいね。m(__)m