戻る  □VBAのサロン  □ 使用方法  □ 新着記事  □ 新規に質問する!  □ トピック一覧  □ 検索  □ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
このトピック参照回数 :
同数の数値とその個数を抽出するには

    [130229] 同数の数値とその個数を抽出するには-

    ■親トピック/記事引用/メール受信=OFF■

    □投稿者/ kuma5228 -(2019/05/09(10:15))
    □U R L/

      50個の数字が横1列に並んでいます。その中で同数が2個以上ある数値とその個数を抽出するにはどうしたらよいでしょうか?。OSはWindows10、Excelは2016をつかっています。


      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒OTHER
      ++++++++++++++++++++




    [130230] Re[1]: 同数の数値とその個数を抽出するには-

    記事引用/メール受信=OFF■

    □投稿者/ SH -(2019/05/09(13:23))
    □U R L/

      A1:AZ1にデータがあるとして

      A4から書き出します。
      A4:{=IFERROR(MIN(IF(COUNTIF($A$1:$AZ$1,$A$1:$AZ$1)>=2,$A$1:$AZ$1,"")),"")}
      配列数式なので Ctrl+Shift+Enterで確定 式の前後に {・・}がつく。
      B4:=IF(A4="","",COUNTIF($A$1:$AZ$1,A4))
      A5:=IFERROR(SMALL(IF(COUNTIF($A$1:$AZ$1,$A$1:$AZ$1)>=2,$A$1:$AZ$1,""),SUM($B$4:B4)+1),"")
      配列数式なのでCtrl+Shift+Enterで確定
      B5:=IF(A5="","",COUNTIF($A$1:$AZ$1,A5))
      A5:B5を下へフィルコピー




    [130231] Re[2]: 同数の数値とその個数を抽出するには-

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2019/05/09(20:46))
    □U R L/
        A  B C D  E F  G H 《《 AU AV AW AX
      1  13 15 25 21 27 18 13 30 》》30 27 24 13
      2
      3  作業用    2個以上
      4  値 個    値 個
      5  11 3    11 3
      6  12 1    13 5
      7  13 5    15 2
      8  14 0    19 3
      9  15 2    21 9
      10  16 1    24 2
      11  17 1    26 4
      12  18 1    27 8
      13  19 3    30 6
      14  20 1
      〜〜〜〜〜〜
      〜〜〜〜〜〜
      23  29 1
      24  30 6
      25
      
      1.セル A5 に式 =MIN(A$1:AX$1) を入力
      2.式 =IF(A5+1>MAX(A$1:AX$1),"",A5+1) を入力したセル A6 を下方にズズーッ
       ̄ ̄とオートフィル
      3.式 =COUNTIF(A$1:AX$1,A5) を入力したセル B5 を下方にズズーッとオート
       ̄ ̄フィル
      4.次式を入力したセル E5 を右隣および下方にズズーッとオートフィル
       ̄ ̄=IFERROR(INDEX(A:A,SMALL(IF($B$5:$B$24>1,ROW(A$5:A$24)),ROW(A1))),"")
       ̄ ̄【お断り】上式は必ず配列数式として入力のこと
      



      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒Excel 2007
      ++++++++++++++++++++




    [130236] Re[3]: 同数の数値とその個数を抽出するには-

    記事引用/メール受信=OFF■

    □投稿者/ SH -(2019/05/12(16:25))
    □U R L/

      A4:=IFERROR(SMALL(INDEX((COUNTIF($A$1:$AX$1,$A$1:$AX$1)>=2)*$A$1:$AX$1,),SUMPRODUCT((COUNTIF($A$1:$AX$1,$A$1:$AX$1)=1)*1)+1),"")
      B4:=IF(A4="","",COUNTIF($A$1:$AZ$1,A4))
      A5:=IFERROR(SMALL(INDEX((COUNTIF($A$1:$AX$1,$A$1:$AX$1)>=2)*$A$1:$AX$1,),SUMPRODUCT((COUNTIF($A$1:$AX$1,$A$1:$AX$1)=1)*1)+SUM($B$4:B4)+1),"")
      B5:=IF(A5="","",COUNTIF($A$1:$AZ$1,A5))
      A5:B5を下へコピー




    [130250] Re[4]: 同数の数値とその個数を抽出するには-

    解決!!ありがとうございました! / 記事引用/メール受信=OFF■

    □投稿者/ kuma5228 -(2019/05/14(11:31))
    □U R L/

      有難うございました。Mikeさんの方法でうまくいきました。他の方の方法も試してみたいと思います。皆さんありがとうございました。



このトピック内容の全ページ数 / [0]

このトピックに書きこむ
Name/
E-Mail/

└>このツリーのレス記事をメールで受信しますか? YES/ NO/
Title/
URL/
Comment/ 通常モード->  図表モード-> (←の場合適当に改行を入れて下さい)
タグが使用できます。例 ⇒ <font color="blue">文字</font>
解決!!ありがとうございました! 解決       保留中です・・・ 保留        迷宮入りorほかあたって見ます・・ 迷宮入       すいませ〜ん。誰か〜! Help! ←※回答者専用
解決したらチェック       保留(コードテスト中など・・)         解決不可orレスが全く付かなくてほかのサイトに行くときなど・・
削除キー/
(半角8文字以内) 


- Child Forum -
Edit:ゆう-G