ALPHA
ALPHA
ALPHA
BRAVO
BRAVO
DELTA
TANGO
TANGO

上記のように縦に並んだ重複データを
以下のように集計する方法はないでしょうか。

ALPHA 3
BRAVO 2
DELTA 1
TANGO 2

WEB検索したところ、重複データ消去or抽出という
関数、マクロはあったのですが、
集計に至るまでのTIPSはありませんでした。
よろしくお願い致します。

A 回答 (4件)

表先頭に見出し行挿入→データ列に「データ名」(仮)とし→データ→集計で集計方法を「データの個数」、集計するフィールドを「項目」選択→OK


行横に1から3のグループ番号が表示されますので2番を選択すれば、ご期待結果になると思いますが如何でしょうか。
    • good
    • 1

フィルタオプションの設定を使って重複しないデータを抽出したら


その隣の列にsumcout関数を使ってデータの個数を集計するという方法はいかがでしょうか。

○フィルタオプションの設定
http://www11.plala.or.jp/koma_Excel/contents3/ma …
の「29-1重複しない抽出」を使ってD列に重複しないデータを抽出します。
○集計の方法
[説明02906]の表でE3のセルに「=coutif($A$3:$A$17,D3)」と入れ、E4以降のセルにドラックします。
    • good
    • 0

NO2です。


集計するフィールドは。「項目」ではなく「データ名」でした、訂正させて頂きます。
    • good
    • 0

先頭行に項目名を挿入した上で「データ」「ピボットテーブル」


項目名を行とデータに設定すれば上記の表が出来ます。
この内容をコピーして値として貼り付けるのが単純ですが...

抽出(オートフィルタ)を使うなら
隣の行に
=IF(COUNTIF($A$1:$A1,A1)=1,COUNTIF(A:A,A1),"")のようにすれば
ALPHA 3
ALPHA
ALPHA
BRAVO 2
BRAVO
DELTA 1
TANGO 2
TANGO
となります。「データ」「オートフィルタ」で空白でないセルを抽出すればOKです。
    • good
    • 1

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルで、列内が同じ名前を集計する方法は?

エクセルで以下のような表を作成したとします。

      A列   B    C    D
 1行   名前   項目   金額
 2    すずき  あいう  100
 3    すずき  かきく  200
 4    すずき  さしす  450
 5    さとう  あいう  150
 6    さとう  さしす  200
 7    はやし  あいう  250 
 8    はやし  かきく  170
 9    はやし  たちつ  980

B列の名前が同じ者の、金額の合計をD列に出したいのです。
D4に すずきの合計 750、D6にさとうの合計 350、
D9にはやしの合計 1150  というふうに。
全部で100人分位、データ行数は15000ほどあるのですが
これをさっとできるようにはどのようにしたら良いのでしょうか?

Aベストアンサー

次の方法は如何でしょうか。
D2に=IF(COUNTIF(A:A,A2)=COUNTIF($A$2:A2,A2),SUMIF(A:A,A2,C:C),"")を入力→D2を選択→フィルハンドル(D2セル枠右下の■)をダブルクリック
但し、C列途中に空白がある場合、その直前までしかコピーされませんので、空白セル前のセルを下方向にコピー後、同様にフィルハンドルをダブルクリックし下さい。

QEXCEL 重複データの集計の仕方

下記の表のような、「管理コード」ごとの「数量」の集計をしたい場合は、どうしたらよいでしょうか?

Aベストアンサー

集計機能・数式・ピボットテーブル…参考書のお手本のように集計案が出てますね。
では私からも一つ。
統合機能です。

集計表を作りたい位置のセルを選択し、
データ→データツールグループ→統合
統合元範囲→元表の範囲を選択(列選択でもOK)→追加ボタン
統合の基準→□上端、□左端にチェックを入れる→OK

上の見出しはそのまま使われるので商品名の列が空白で出てきますが、管理コードごとに数量が集計されているはずです。
ちょっとマイナーな機能ですけどね。

Qエクセル集計・重複データを合計したい(VLOOKUPがうまくいかない)

どなたかお力を頂けませんか?
以下のようなデータ(データAとする)があります。
営業所にはダブりがあります。ダブりの分の営業所の契約数も合計させたいです。(例えば、この表でいったら、新宿の契約数は4)(ダブりの数は知る必要がありません)どうすればよいでしょうか?

データA(行数500位)

A B
1 営業所 契約数
2 新宿 2
3 渋谷 3
4 新宿 2
5 渋谷 1
6 調布 5

これだけ教えて頂いても有り難いのですが、これはこの後、以下の別データBに入力していきたいので、もしできたらその件も併せてアドバイス頂けると幸いです(><;)

以下のようなデータに、先ほど出した契約数を入力したいです。

(単純にVLOOKUPを使うと(今の私のできる精一杯の技なのですが)「このプロジェクトのマクロは無効に設定されています」と出てしまい、そこからどうしたらいいのかわからなくなります。
データAにマクロがあちこち使われているようで、「値のみ」をコピーしてそこからVLOOKUPを使ってみましたが(こうするとマクロが消えるかなと思って)やはり同じように無理でした。)

データB(行数100位)

A B
営業所 契約数
1 渋谷
2 恵比寿
3 新宿
4 赤羽
5 銀座

データAとデータBの営業所データは必ずしも一致していません。
AにあってBに無いもの、その逆もあります。
データAとデータBの数が全然違います。

(会社では1つ1つ目でみてチェックしていけと言われましたが、それでは何日もかけた挙句に沢山ミスをしそうです、どうしたらよいものか)
皆様御忙しいと思いますが、何かアドバイスでも頂ければとても有り難いです!何卒、宜しくお願い致しますm(__)m

どなたかお力を頂けませんか?
以下のようなデータ(データAとする)があります。
営業所にはダブりがあります。ダブりの分の営業所の契約数も合計させたいです。(例えば、この表でいったら、新宿の契約数は4)(ダブりの数は知る必要がありません)どうすればよいでしょうか?

データA(行数500位)

A B
1 営業所 契約数
2 新宿 2
3 渋谷 3
4 新宿 2
5 渋谷 1
6 調布 5

これだけ教えて頂いても有り難いのですが、これはこの後、以下の別データBに入力していきたいので、も...続きを読む

Aベストアンサー

1点目、一時的に数字を知りたいだけなら営業所を列で昇順に並べ替えをして
データ → 集計 でグループの基準を「営業所」、集計するフィールドで「契約数」をチェックしてOKを押せば表示されます。

関数で出さなければならないならSUMPRODUCT関数か配列数式を使う事になると思います。


2点目、データBの契約数(例えばB2セル)に下記数式を入れて必要数コピーすれば良いのでは?
=SUMIF(データA!$A$2:$A$500,A2,データA!$B$2:$B$500)
(シート名が「データA」と仮定した場合です)
但し、データBに無い営業所はカウント対象外になります。

Qエクセルのセルにある同じ値が何件あるかを調べたいのですが・・

教えてください。
マイクロソフトエクセルで各セルの値が何件あるかを調べたいのです。
例えば
A1セルに4300
A2セルに1500
A3   1000
A4   4300
A5   1000
・・・・・
など同じAセルに約300近くの値が入っていたとします。
この場合
4300 は 2件
1500 は 1件
1000 は 2件など「件」はつかなくて数値だけでも助かります。
代金の返金をする時に紙幣や硬貨を用意する為に同じ値がいくつあるかが知りたいです。
オートフィルタで同じ数値だけを出す方法もありますが、こちらの方法で出来ることでしたら教えて下さい。
宜しくお願い致します。
エクセルのバージョンは古くて2002です。

Aベストアンサー

こんばんは!
色々方法はあるかと思いますが・・・

一例です。

↓の画像のようにB列を作業用の列とさせてもらっています。

B2セルに
=IF(COUNTIF($A$2:A2,A2)=1,ROW(A1),"")
という数式を入れオートフィルでずぃ~~~!っと下へコピーします。

そして、D2セルに
=IF(COUNT($B$2:$B$1000)<ROW(A1),"",INDEX($A$2:$A$1000,SMALL($B$2:$B$1000,ROW(A1))))

E2セルに
=IF(D2="","",COUNTIF($A$2:$A$1000,D2))

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

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

以上、長々と書きましたが
参考になれば幸いです。m(__)m

QEXCELでの重複データカウント方法について

会社名のデータが1万件あります。
その中には、同じ会社名が重複しているものがあります。
そこで、重複しているデータは1つのものとしてカウントし、全部で何件の会社が存在するかカウントする方法はあるでしょうか?

Aベストアンサー

1)集計したSHEETを全選択してコピー
2)別のSHEETに形式を選択して貼り付け(値だけ)
3)会社名カラムで、[データ]-[フィルタ]-[オートフィルタ]
4)出てきた三角形をクリックして、(オプション)
5)「個数」で「終わる」を選択してフィルタ実行
6)コピーして別のシートに貼り付け

EXCELのバージョンによって(6)の動作は変るかもしれません。
上手くいかなかったら、セルで選択してコピー、列で選択してコピー、行で選択してコピー、全部試してみてください。

それでもだめなら、
(1)集計行の前に一列追加
(2)追加した空の列に =RIGHT(B1,6) と入力(注:B1は会社名のセル)
   これで、追加した列は「データの個数」と表示されるはず
(3)(2)を全行にコピー
   つまり、集計行の頭には「データの個数」が並ぶ。他の行はブランク。
(4)追加した行を[データ]-[並べ替え]

これで、集計行だけが一箇所にあつまるはず
   

Qエクセルで重複しているデータの抽出のしかたを教えてください。

エクセルで重複しているデータを抽出したいのですが・・。なにぶん初心者なもので簡単な方法があればよいのですが・・。
A列に日付 B列に企業名このデータが300件ほどあります。

 Å列      B列
1月 1日    AAAA社
1月 4日   BBBB社
1月 8日   CCCC社
2月 1日   BBBB社
2月20日    DDDD社
3月 2日   AAAA社

と、あるとしてB列の企業名が重複しているものを抽出したいのですが・・・。この場合 AAAA社とBBBB社ですが。
これを簡単に抽出する方法はないでしょうか?
教えてください お願いいたします。

Aベストアンサー

企業名がセルB2からセルB300まで入力されていると仮定します。
セルC2に IF(COUNTIF($B$2:B2,B2)>1,"*","") を入力し、セルC300までコピーして下さい。すると重複したデータの二番目以降に "*" のマークが付きます。
(注) 数式を下のセルまでコピーするため、COUNTIF($B$2 は絶対参照にして下さい。

Q重複データの数量を合計し、重複データを削除する方法

下記のようなエクセルデータがあるとします。
品番は重複しており、数量は異なっています。

A.品番 B.数量
 1--------1
1--------3
1--------2
1--------1

これを下記のようにしたいです。

A.品番 B.数量
1--------7

このように重複データの数量を合計して、かつデータを1つにまとめる
方法を教えて下さい。よろしくお願いします。

Aベストアンサー

ピボットテーブルって機能があります。
それで、ご希望の内容が対応できますよ!
添付の画像の左がリスト、右がピボットテーブルです。
エクセルのバージョンによって使い方が変わるようですので、詳細はヘルプを参照ください。
そんなに難しくはないですよ。

Q【エクセル】1列内に複数ある同項目を、各項目一つずつに絞る方法

お世話になります。

アクセスで各商品コードごとに、「各施設の価格一覧」
集計をとるための下準備(各コード、重複なく一つずつに
絞られたテーブルを作りたいです)として、
エクセルシート内で無秩序に複数ある各商品コードから、
それぞれ一つずつだけ列挙されたシートを作りたいです。

1万行を超えているので、「集計」でまとめても
意味がないだろうし、この場合の対応策について
皆目思い浮かばないのですが、
よろしければアドバイスいただけないでしょうか。

よろしくお願い致します。

Aベストアンサー

こんばんは。

Accessを使うのも結構なのですが、Excelでは、フィルタオプションを使います。

メニューから
[データ]-[フィルタ]-[フィルタオプションの設定]

 指定した範囲(O)
 リスト範囲(L) に範囲を入力
 抽出範囲は、適当に1つのセルを選択し、

 □重複するレコードは無視する(R)にチェック

 OK

で、ユニーク・データが取れます。

これは、ユニーク・データを取るためのExcelのデータベース機能です。

Qエクセルで、条件に一致した行を別のセルに抜き出す方法

エクセルで、指定した条件に一致するセルを含む行をすべて抜き出す方法が知りたいです。

たとえば、

<A列> <B列> <C列>
7/1 りんご 100円
7/2 ぶどう 200円
7/2 すいか 300円
7/3 みかん 100円

このような表があって、100円を含む行をそのままの形で、
別のセル(同じシート内)に抜き出したいのですが。

7/1 りんご 100円
7/3 みかん 100円

抽出するだけならオートフィルターでもできますが、
抽出結果を自動的に、別の場所に、常に表示させておきたいのです。

初歩的な質問だと思いますが、検索しても分からなかったので、よろしくお願いします。

Aベストアンサー

同じ質問が結構よく出てますが、そんなに初歩的でもありません
別シートのA1セルに「100円」と入力し、そのシートの任意のセルに以下の式を貼り付けて下さい。後は、下方向、右方向にコピー。
日付のセル書式は「日付」形式に再設定してください

=IF(COUNTIF(Sheet1!$C:$C,$A$1)>=ROW(A1),INDEX(Sheet1!A:A,LARGE(INDEX((Sheet1!$C$1:$C$500=$A$1)*ROW(Sheet1!$C$1:$C$500),),COUNTIF(Sheet1!$C:$C,$A$1)-ROW(A1)+1)),"")

データ範囲は500行までとしていますが、必要に応じて変更して下さい

Q【excelマクロ】重複データをチェックしてその行を削除・表を集計して整頓するマクロ

MC28SP 会社で資材の在庫管理表を作成しているのですが、大変困っております。
マクロ初心者で技術不足なのでどうかご教授願います。
「資材受け入れシート」として、下の表があります。
   1   2   3  4
 受入日 品名  Lot  数量
  7/7   A  BNR32  10
  7/8   A  BNR32  5
  7/10   B  SW200  2
  7/7   B  AE860  4
  7/8   B  SW200  12
  7/9   C  GD300  10
  7/7   C  GD300  1
  7/7   C  DC200  7
これを2列目「品名」をキーとして「Lot」を確認し、同じ(つまり同じ物)であればその行を削除して、数量を加算して1行にまとめるマクロを作りたいのです。ポイントは(1)2列目「品名」の重複確認のみで行削除ではなく、3列目「Lot」も確認する必要があることと、(2)削除してからその「品名」がある行に削除した「数量」分加算しなくてはいけないことだと考えているのですが・・・。
  1   2   3  4
 受入日 品名  Lot  数量
  7/8   A  BNR32  15
  7/10   B  SW200  14
  7/7   B  AE860  4
  7/9   C  GD300  11
  7/7   C  DC200  7
「受入日」の所はできれば最終日になれば良いかなと思っています。
会社で期限を決められているのですが、手こずってしまい前へ進みません。説明が分かりづらいかもしれませんが、どうか宜しくお願い致します。

MC28SP 会社で資材の在庫管理表を作成しているのですが、大変困っております。
マクロ初心者で技術不足なのでどうかご教授願います。
「資材受け入れシート」として、下の表があります。
   1   2   3  4
 受入日 品名  Lot  数量
  7/7   A  BNR32  10
  7/8   A  BNR32  5
  7/10   B  SW200  2
  7/7   B  AE860  4
  7/8   B  SW200  12
  7/9   C  GD300  10
  7/7   C  GD300  1
  7/7   C  DC200  7
これを2列目「品名」をキーと...続きを読む

Aベストアンサー

ご参考までにという事で。。。
標準モジュールで実行してみてください。

Sub test()
  Dim strSql As String
  Dim cnXL As Object
  Dim rsXL As Object
  Const adOpenForwardOnly = 0
  
  
  Sheets("資材受け入れシート").Range("A1:D1").Copy
  Sheets("資材受け入れシート").Paste Destination:=Worksheets("Sheet2").Range("A1:D1")
  Application.CutCopyMode = False
  
  Set cnXL = CreateObject("ADODB.Connection")
  Set rsXL = CreateObject("ADODB.Recordset")

  With cnXL
    .Provider = "MSDASQL"
    .ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _
    "DBQ=" & ThisWorkbook.FullName & "; ReadOnly=True;"
    .Open
  End With

  strSql = "select max(受入日) as 日付,品名,Lot,sum(数量) as 合計" _
        & " from [資材受け入れシート$]" _
        & " group by 品名,Lot order by max(受入日),品名,Lot"
  
  Debug.Print strSql
  rsXL.Open strSql, cnXL, adOpenForwardOnly

  Worksheets("sheet2").Cells(2, 1).CopyFromRecordset rsXL
  Worksheets("sheet2").Columns("A:A").NumberFormatLocal = "m/d"
  
  rsXL.Close: Set rsXL = Nothing
  cnXL.Close: Set cnXL = Nothing
  MsgBox "Sheet2に出力しました"
End Sub

ご参考までにという事で。。。
標準モジュールで実行してみてください。

Sub test()
  Dim strSql As String
  Dim cnXL As Object
  Dim rsXL As Object
  Const adOpenForwardOnly = 0
  
  
  Sheets("資材受け入れシート").Range("A1:D1").Copy
  Sheets("資材受け入れシート").Paste Destination:=Worksheets("Sheet2").Range("A1:D1")
  Application.CutCopyMode = False
  
  Set cnXL = CreateObject("ADODB.Connection")
  Set rsXL = CreateObject("ADODB.Reco...続きを読む


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報