同じ日にちの件数を制限して抽出する

Question

日付ごとのデータがあり、同じ日付の数は日によって違い、10個の時も20個の時もあります。
そのデータを、同じ日付のデータは14個以下に制限し、それ以上は無視して別シートに抽出したいのですが。（エクセル２０１０）

下記のようなシート１のデータを

Ａ　　　　　Ｂ　　　　　Ｃ
１　　11月1日　　りんご　　　Ａ社
２　　11月1日　　みかん　　Ｃ社
３　　11月1日　　とまと　　　Ｂ社
・
・
１４　11月1日　　みかん　　Ｄ社
１５　11月1日　　とまと　　　Ｈ社
１６　11月2日　　ばなな　　　Ｂ社　
１７　11月2日　　りんご　　　Ｄ社

別シートに下記のように抽出

Ａ　　　　　Ｂ　　　　　Ｃ
１　　11月1日　　りんご　　　Ａ社
２　　11月1日　　みかん　　Ｃ社
３　　11月1日　　とまと　　　Ｂ社
・
・
１４　11月1日　　みかん　　Ｄ社
１５　11月2日　　ばなな　　　Ｂ社
１６　11月2日　　りんご　　　Ｄ社

どなたか教えていただける方がいましたらよろしくお願いします。

MackyNo1 · Accepted Answer

1行目に項目名がある場合、空白列(たとえばD2セル）に以下の式を入力し、下方向にオートフィルします。

=IF(COUNTIF($A$2:A2,A2)>14,"","○")

このD列を基準に「データ」「フィルタ」で「○」を選択して、必要データのみ抽出し、このA～C列のデータ範囲を選択して「コピー」して新規シートに貼り付けてください。

KURUMITO · Answer

データは2行目から下方にあるとします。Ｄ列は作業列でＤ2セルには次の式を入力して下方にオートフィルドラッグします。

=IF(A2="","",IF(COUNTIF(A$2:A2,A2)<=14,MAX(D$1:D1)+1,""))

上の表がシート1にあるとして別のシートのＡ2セルには次の式を入力して横方向にオートフィルドラッグしたのちに下方にもオートフィルドラッグします。

=IF(OR(COLUMN(A1)>3,ROW(A1)>MAX(Sheet1!$D:$D)),"",INDEX(Sheet1!$A:$C,MATCH(ROW(A1),Sheet1!$D:$D,0),COLUMN(A1)))

なお、Ａ列を選んでセルの表示形式を日付にします。

tom04 · Answer

こんばんは！
一例です。

↓の画像で左側がSheet1で右側のSheet2に表示するようにしてみました。
Sheet1に作業用の列を設けています。

作業列D2セルに
=IF(OR(A2="",COUNTIF($A$2:A2,A2)>14),"",ROW())
という数式を入れ、フィルハンドルの（＋）マークでダブルクリック、またはオートフィルで下へずぃ～～～！っとコピーしておきます。

そして、Sheet2のA2セルに
=IF(COUNT(Sheet1!$D:$D)<ROW(A1),"",INDEX(Sheet1!A:A,SMALL(Sheet1!$D:$D,ROW(A1))))
という数式を入れ、列方向と行方向にオートフィルでコピーすると
画像のような感じになります。

当然、Sheet2のA列の表示形式は「日付」にしておきます。

以上、参考になれば良いのですが・・・m(__)m

iktmth · Answer

例えば、１行目にタイトルがあり、２行目からデータがならんでいるとします。
　１４個以下にしたいということは、１５個目から下を削除、すなわち、１６行目以下を削除すればよいということです。
　日付ごとに別シートになっているようですが、日付ごとのシートの口取紙（インデックス）部分をまとめて選択して、１６行目以下を削除すれば、すべてのシートの１６行目以下が削除されます。
　別ファイルになってしましますが、(1)口取紙（インデックス）部分を選択する作業と、(2)１６行目以下を削除する２作業で完了です。

口取紙（インデックス）部分とは、シートを選択する際にクリックする下の左部分にある「Sheet1」とか「Sheet2」とか表示してある部分です（名前をしらないので、そう表現しました。ご存知でしたら、逆に教えていただくとありがたいです）。

複数のシートを一括して選択するには、最初に一番左端の口取紙部分をクリックしてから、一番右端の口取紙部分をＳＨＩＦＴキーを押しながらクリックすればできます。
　特定のシートのみを選択したい時には、選択したいシートの口取紙部分をＣＴＲＬキーを押しながらクリックすればできます（最初の１つ目の口取紙は、ＣＴＲＬキーなしでクリックしてください。）。

同じ日にちの件数を制限して抽出する

このQ&Aに関連する最新のQ&A

1行目に項目名がある場合、空白列(たとえばD2セル）に以下の式を入力し、下方向にオートフィルします。

データは2行目から下方にあるとします。

こんばんは！

例えば、１行目にタイトルがあり、２行目からデータがならんでいるとします。

関連するQ&A

関連するカテゴリからQ&Aを探す

人気Q&Aランキング

　例えば、１行目にタイトルがあり、２行目からデータがならんでいるとします。